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Preface 

This manual is the second in a series of two volumes. The reference 
information combined in these two manuals is provided as a DOS/VS 
serviceability aid and is, therefore, a summary of other DOS/VS 
documentation. These manuals are intended for use by persons 
involved in program support. 

The two volumes contain the following information: 

- Volume 1.SY33-8571: 



Chapter I 



System/370 General Information 
DOS/VS General Information 
DOS/VS IOCS (General, SAM, DAM, ISAM) 
DOS/VS Supervisor Control Blocks and Areas 
DOS/VS Service Aids 



Volume 2, SY33-8572: 



Chapter I 
II 
III: 

IV: 
V 
VI 



POWER/VS 
VTAM Control Blocks 
VSAM Control Blocks 
Model 20 Emulator 
14xx Emulator 
BTAM 



If there is any discrepancy between the information contained in this 
manual and the DOS/VS optional programming material (e.g., PLMs 
and listings), the latter is assumed to be correct. 



Third Edition (November, 1975) 

This is a major revision of, and obsoletes, SY33-8572-1. It applies to 
Version 5, Release 32, of the IBM Disk Operating System/Virtual 
Storage, DOS/VS, and to all subsequent versions and releases until 
otherwise indicated in new editions or Technical Newsletters. Changes 
are continually made to the information herein; before using this 
publication in connection with the operation of IBM systems, consult 
the latest IBM Svstem/370 Bibliography, GC20-0001, for the editions 
that are applicable and current. 

Requests for copies of IBM publications should be made to your IBM 
representative or to the IBM branch office serving your locality. 

A handbook-sized binder, FE Part Number 453559, may be purchased 
from IBM. Customers may order it through their IBM marketing 
representative. IBM personnel should order it as an FE part from 
Mechanicsburg. 

This manual has been prepared by WT-DP/CE Technical Operations, 
Dept. 265, P.O. Box 24, Uithoorn, The Netherlands. 

A form for readers' comments is provided at the back of this 
publication. If the form has been removed, comments may be sent 
to the above address. Comments become the property of IBM. 

© Copyright International Business Machines Corporation, 1974,1975 
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CHAPTER I 
POWER/VS 




PROGRAMMING REQUIREMENTS FOR POWER/VS 









Programming requirements 
1 








1 




+ 




1 






During generation 




The following 




Number of entries . 




I/O Files 


of the DOS/VS 




phases must be 




in the LIB table 






supervisor 




cataloged in the 




belonging to the 




The Queue file and 


POWER = YES 




CIL: 




POWER/VS 




Data file must be 


in SPVR macro 








partition must 




assigned to a 


forces: 




IPW$$I1 




be large enough 




spooling device. 


• PHO = YES 




IPWSSI2 




to accommodate 




Queue file SYS001 


• PFIX=YES 




IPW$$NU 




all reader and 




Data file(s) thru 


• ECPREAL = YES 




IPWSSCP 




writer tasks that 




SYS006 


and if 




IPWSSGD 




may be running 




as required. 


• N PARTS = 1 




IPW$$PD 




concurrently. 




Queue file and 


or is not 




IPW$$AQ 




Programmer LUBs 




Data file extents 


specified, 




IPW$$RQ 




SYS000 thru 




must be defined on 


• NPARTS=3 




IPWSSNQ 

IPW$$DQ 

IPWSSFQ 

IPWSSPR 

IPWSSLR 

IPW$$PL 




SYS006 are 
reserved for the 
account, queue 
and data files. 




the SYSRES label 
information cylinder 
























IPWSSLW 












IPWSSPP 












IPWSSXR 












IPW$$XW 












IPWSSXJ 












IPWS$TR 












IPW$$LU 












IPWSSPS 












IPWSSSL 












IPW$$IC 












1PW$$SC 












IPW$$ER 












IPW$$OE 












IPW$SOT 












SSBPOWIN 












and the macro 












POWER must be 












cataloged in 












the SSL 














1 















for POWER/VS RJE 
(optional) 



in 



The phases 
IPWSSTM 
IPWSSMS must alsc 
be cataloged in 
the CIL and the 
macros PLINE and 
PRMT must be 
cataloged in SSL 



The following 
phases must also 
be cataloged in 
the CIL 
IPWSSPA 
IPW$$GA 
IPWSSSA 



for POWER/VS Accounting 
(°P»°"°') 



JA=YESornl, 
n2,n3,n4,n5 
must be specified 
in the FOPT macro 
during generation 

f the DOS/VS 
supervisor 



An account file 
must be assigned to 
SYS000, a spooling 
device. Account 
file extents must be 
defined on the 
SYSRES label informa- 
tion cylinder 



RELATIONSHIP BETWEEN A QUEUE SET, QUEUE RECORDS, AND A QUEUE ENTRY 



I a Queue 



queue record 



queue record 



I queue record 



queue record 



L 



3 Queue Entry 



— « track group 



— M track group 



— W track group 
— W track group 



Queue file 
SYS001 



Data file 
SYS002 



FREE QUEUE SET 



© © (D 

master record — J queue record J queue record M queue record 



© MRQF field in master record 

© QRNS field in queue record (zero=last) 



CLASS CHAIN AND QUEUE SET 



class table 
in DMB 



2 



♦ first-in-set queue record 



first-in-set queue record 

r it— 



"1 



first-in-set queue record 






next-in-set queue record 



5 — j (■ P last-in-set queue record 

if- 



J 



1 CTQF field in class table entry 

2 CTQL field in class table entry (zero means last in chain) 

3 QRQN field in queue record 

4 QRQP field in queue record 

5 QRNS field in queue record (zero means last in chain) 



INTERFACES AND TASK STRUCTURES 



©H. 



DOS/VS SUPERVISOR 



SVCO 
APPENDAGE 

Posts appropriate 

execution 

processor task 

and sets 

POWER/VS 

partition 

dispatchable 



-T- 



© 



exec. RDR task 
exec. LST task 
exec. PUN task 



HOT READER 
APPENDAGE 



Locates appropriate 
reader task and 
posts it 
dispatchable 



© 



PAGE FAULT 
APPENDAGE 



Pre-processor 



Changes next 
sequential 
instruction in PSW 
to task manage- 
ment to select 
another task 
during processing 
of the page fault. 
Queues page 
faults before 
returning to page 
manager 



Post -processor 



Posts appropriate 
task dispatchable 
and sets POWER/VS 
dispatchable. 
Returns next page 
fault in queue to 
page manager 



ATT. INTERFACE 
APPENDAGE 



Verifies and passes 

potential 

POWER/VS 

command; posts 

command 

processor task 

dispatchable. 



I 



SVC 90/91 
APPENDAGE 



Passes DOS/VS 
and user job 
accounting 
information to 
execution account 
record area; posts 
execution reader 
task dispatchable 



IPW$$NU 

task management 



Scans for TCB of 
task with highest 
priority ready to 
run and dispatches 



W 



© 



RJE CHANNEL END 
APPENDAGE 



Queues BCA in 
BCA chain and 
posts line manager 
task dispatchable 



© 



exec. RDR task 



manager task 



$ 



1* J * From any task issuing 
POWER/VS wait or 
detach 



task dispatchable 



"® 



1 1 

(A) [_•>. any task (at post-processor) or 

"" task management (at pre-processor) 



INTERFACES AND TASK STRUCTURES 



£ 



LOCAL READER TASK 




RJE READER TASK 




EXECUTION READER 
TASK 




EXECUTION LIST TASK 




EXECUTION PUNCH 
TASK 


IPWSSPRor IPWSSER 


IPWSSTM 


IPWSSXR 


IPWSSXW 


IPWSSXW 


Reads cards into physical 
data area (PDA) and 
links to logical reader. 




Reads cards from terminal 
device (using RTAM 
routines) and links to 
logical reader. 




Emulates reader I/O 
requests from user 
program into read 
operations from data 
file. 

Invokes execution 
list/punch writer task 
whenever list or 
punch I/O request 
to be emulated. 




Emulates list I/O 
requests from user 
program into write 
operations to data file 
and creates a queue 
entry by means of 
function routines. 




Emulates punch I/O 
requests from user 
program into write 
operations to data file 
and creates a queue 
entry by means of 
function routines. 


IPW$$LR 

Writes data records to 
data file from logical 
data area (LDA) and 
creates queue entry 
by means of function 
routines. 


IPWSSLR 


Writes data records to 
data file from logical 
data area (LDA) and 
creates queue entry 
by means of function 
routines. 


Functions used by 
IPW$$PR, IPWSSER and 
IPWSJLR 

RQ,AQ,PD,DQ,FQ, 
PA,LU,SC,OE 


Functions used by 
IPWSSTM and IPWSSLR 

RQ,AQ,PD,DQ,FQ, 
PA,LU,SC,IC,MS 


Functions used by 
IPWSSXR 


Functions used by 
IFWSSXW 


Functions used by 
IPW$$XW 


GD,NQ,DQ,FQ,PA, 
XJ,SL 




RQ ; AQ,PD 




RQ,AQ,PD 


Services used 










TM,RM,SM / MS,DS,TIS 




TM,RM,SM,MS,DS,TIS 




TM,RM,SM,MS,DS,VS 




TM,RM f SM,MS,D^TS, 




TM,RM,SM,MS,DS^S, 



^ 



$ & c 1 0? 







INTERFACES AND TASK STRUCTURES 



^ 



LOCAL LIST TASK 



IPW$$PL 



LOCAL PUNCH TASK RJE LIST TASK 



IPW$$PP 



IPW$$TM 



RJE PUNCH TASK 



IPW$$TM 



COMMAND 
PROCESSOR TASK 



IPW$$CP 



3> 



Links to logical writer 
and prints lines from 
physical data area 
(PDA) 



Links to logical writer 
and punches cards from 
physical data area 
(PDA) 



Links to logical writer 
and prints lines at 
terminal using RTAM 
routines 



Links to logical writer 
and punches cards at 
terminal using RTAM 
routines 



IPW$$LW 



IFW$$LW 



Reads data records from 
data file using 
information from queue 
records belonging to 
queue entry by means 
of function routines 



Reads data records from 
data file using 
information from queue 
records belonging to 
queue entry by means 
of function routines 



_[PW$$LW 

Reads data records from 
data file using 
information from queue 
records belonging to 
queue entry by means 
of function routines 



IFW$$LW 

Reads data records from 
data file using 
information from queue 
records belonging to 
queue entry by means 
of function routines 



Builds and attaches 
tasks into task selection 
list, initiates termination 
of tasks, or changes 
status queue entries 
according to command 
received 



Functions used by 
IPW$$PL and IPW$$LW 



Functions used by 
IPW$$PP and IPW$$LW 



Functions used by 
IPW$$TM and IPW$$LW 



Functions used by 
IPWSSTM and IPW$$LW 



Functions used by 
IPW$$CP 



NQ,DQ,FQ,PA,LU 



NQ,DQ,FQ,PA,LU 



NQ,DQ,FQ,PA,LU, 
MS,IC 



NQ,DQ,FQ,PA,LU, 
MS,IC 



AQ,DQ,FQ,LU 



Services used 



Services used 
TM,RM,SM,MS,DS, 



Services used 



Services used 
TM,RM,SM,MS,DS, 



TM,RM,SM,MS,DS, 
TS,TIS 



^ 



^ 



TM,RM,SM,MS,DS, 
TS,TIS 



TM,RM,SM,MS,DS 



^ 



^ 



^ 



INTERFACES AND TASK STRUCTURES 



3= 



SAVE ACCOUNT TASK 



IPWSSSA 

Reads account file 
using a function routine 



STATUS TASK 



IFWSSPS 



INITIATOR 
TERMINATOR TASK 



IFWSSI2 



TASK TERMINATOR 
TASK 



IPWSSTR 



RJE LINE 
MANAGER TASK 



IFW$$TM 

Initiates and terminates 



and writes the account 
records to disk, tape or 
punch device, or deletes 
the file, or links to 
logical reader to spool 
cards to be punched 



Reads queue file 
records using function 
routines and prints 
queue status informa- 
tion on. a printer 
device. 



IPWSSLR 



Writes records to 
data file and 
creates queue entry 
using function 
routines 



Loads nucleus and all 
required modules into 
partition at initiation 
time. Opens POWER/VS 
files and links to logical 
reader and writer for 
autostart. Then waits for 
request as terminator. 
Closes POWER/VS files 
and restores partition 
for normal DOS/VS 
operation. 



Handles PSTOP from 
logical reader/writer 
tasks and I/O error or 
WLR error conditions 
On error conditions, 
files are restored to 
their possible status. 
Task uses TCB of task to 
be terminated or to be 
recovered from I/O 
error. 



lines, processes sign 
jn/off, recovers from 
line errors, interfaces 
vith RTAM routines. 



IFW$$LR,IPW$SLW 



Process autostart 
initiation. 



Functions used by 
IPWSSSA 



Functions used by 
IPW$$PS 



Functions used by 
IPWSSI2 



Functions used by 
IPW$$TR 



Functions used by 
IPW$$TM 



AQ,DQ,FQ,PD, 
PA,GA,LU 



Services used 
TM,RM,SM,MS,DS 



Services used 
TM,SM,MS,DS 



Services used 



t^t 



"^r 



TM,SM,MS,DS,TIS 



W 



TM,RM,SM,MS,DS,TS 



V 



W 



POWER/VS OPERATOR COMMAND LANGUAGE (POCL) 



POWER/ VS operator commands include : 

o Task Management commands. Used to control read/write tasks 

and execution processors. 

o Queue Management commands . Used to control the various 

input/output queues. 

o Miscellaneous commands. Enable the operator ro, for example, 

align printer forms or save the POV\€R/VS account file. 

The operator commands consist of two fields, the operation field and the 
operand field. The operand field contains one or more parameters, separated 
by commas, or contains no parameters at all. The operator commands can be 
entered in either uppercase or lowercase. 

POWER/VS supports abbreviated as well as extended operation codes. All 
command options (parameters) are valid for both formats. 



The following 


table shows the abbreviated and the extended command codes : 


Type 


Extended 


Abbreviated 


Function 




format 


format 




Task 


PSTART 


S 


start a task or partition 


management 


PSTOP 


P 


stop a task or partition 




PGO 


G 


activate a task or partition 




PEND* 


- 


end POWER/VS execution" 




PCANCEL 


C 


cancel a POWER/VS status report 




PFLUSH 


F 


flush an active job entry 




PRESTART 


T 


restart a write task 


Queue 


PDISPLAY 


D 


display a job status 


management 


PALTER 


A 


alter attributes 




PDELETE 


L 


delete a job entry or a message 




PRE LEASE 


R 


release a job entry 


Miscellaneous 


PBRDCST 


B 


transmit a message 




PINQUIRE 


1 


check terminal status 




PACCOUNT 


J 


process account file 




PSETUP 


- 


print page layout 



The one-character operation code for PEND, (E) is not supported, since 
the operator might inadvertently end the execution of POWER/VS. 



POWER/VS OPERATOR COMMAND LANGUAGE (POCL) (...Continued) 



Task Management commands 



Operation 


Operand 


Comments 


JpstartI 


1 task, uraddr, [class J 


task : RDR, LST or PUN 


S 


1 task, uraddr, tapeaddr 1 
| partition f, class] j 
IRJE, lineaddr r,passwordjl 


uraddr : Its format is either : 


I J 


cuu or X'cuu'. 


(non -diskette) 


lineaddr : Its format is either : 




cuu or X'cuu'. 






tapeaddr : Its format is : 






X'cuu'. 






password : Any combination of 


JpstartI 


RDR,uraddr1,class2, 


up to eight alpha- 


I s 1 


uraddr 2 


numeric characters, 
class : The meaning of this 


(diskette 




parameter depends on 


data -mode 




the type of task to be 


processing) 




For a write task, "class" 


JpstartI 


RDR, uraddr 2 H class] 


defines the output 


I s ) 


[file-id] 


class(es) upon which 
the task operates. Up 


(diskette 
sysin-mode 


r ->■ i 


to four classes can be 
designated by specifying 


, number-of -diskettes 


processing) 


ts]M 


one to four alphabetic 




characters from A 






through Z. The order 






specified is the order in 






which the classes will 






be processed. If no class 






parameter is specified, 






only class A is selected. 






For a read task, "class" 






defines the input class 






that is assigned to all 






jobs without a class 






specification in their 






* S$ JOB cards, when 






no CTL statement is in 






effect. It may be 






specified as an alpha- 






meric character from 






A through Z or from 






through 4. If no class 






parameter is specified, 






class defaults to A. 



POWER/ VS OPERATOR COMMAND LANGUAGE (POCL) (. . .Continued) 



Task Management commands ( . . .continued) 



Operation 



PSTART, 
S (c'ntd) 



class : For a partition, "class" 

(c'ntd) defines the input 

class(es) that can be 
executed in this 
partition. Up to four 
classes can be designa- 
ted by specifying one 
to four alphameric 
characters from A 
through Z or from 
through 4. The order 
specified is the order 
in which the classes 
will be executed. If 
no class is specified, 
only job entries with 
matching partition- 
type (0-4) input class 
are selected 

partition : BG, F4, F3, F2 

orFl. 
uraddr 1 : physical device 

address of cardreader 
in form X'cuu" or cuu 
uraddr 2: physical device 
address of 3540 
diskette in form 
X'cuu' or cuu. 
file-id : File name as in HDR 1 
label of the diskette 
Can be specified with 
or without quotes. 
Blank characters are 
only allowed when 
filename specified 
within quotes, 
number-of -diskettes : 

Can be one to three 
digits, allowed 
values from 1 to 255 
S : Volume sequence checking. 
Sequence numbers must start 
with 1 and be incremented 
by 1. When omitted, no 
checking will fake place. 
V: File verification. When 
omitted, verify field in 
HDR1 label is ignored. 



POWER/VS OPERATOR COMMAND LANGUAGE (POCL) (. . .Continued) 
Task Management commands (. . .Continued) 



Operation 


Operand 


Comments 


JpSTOpI 

l" J 


uraddr ,EOj ]] 

J [, restart] I 

1 partition [ 
llineaddr [,EOj] 


uraddr : Format is : 

cuuorX'cuu'. 

RESTART: Applies only to 

output processing. 

partition : BG, F4, F3, F2 
or Fl. 

lineaddr : Its format is either: 
cuu or X'cuu'. 


M 


J uraddr 1 
1 partition, cuu [ 


uraddr : Its format is either 
cuu or X'cuu 1 

partition, cuu : specifies the 
partition and 
unit record 
device address 
whose output 
is being 
spooled to tape. 


PEND 


furaddr 1 
KILL furaddr] 


uraddr : Its format is either 
cuu or X'cuu'. 

KILL: Terminates POWER/VS 
immediately. Partitions 
supported by POWER/VS 
are also cancelled. 


(pcancelI 


[status] 


STATUS : A confirmation 

message is issued. 


/pflushI 


furaddr [,HOLD] 1 
| partition f,HOLD]f 


uraddr : Its format is either 
cuuorX'cuu'. 

HOLD : specifies that the 

corresponding job entry 
is not to be deleted, 
but put in the hold 
state. 

partition : BG, F4, F3, F2, 
orFl. 


(prestart! 


uraddr f,n] 


uraddr : Its format is either 
cuu or X'cuu' 

n : signed or unsigned 

value from to 9999. 



POWER/VS OPERATOR COMMAND LANGUAGE (POCL) (...Continued) 



Queue Management commands 



Operation 


Operand 


Comments 


f palter! 


queue, 


jobname r,[obnumberJ 


queue : LST, PUN or RDR 


l A J 




ALL I 


jobname : can be 2 to 8 






*abc | 


characters 






class 1 


jobnumber : may be 1 to 5 




[>RI = priority] 


digits long. 




QDISP = disposition] 


*abc : requests to alter all job 




L = ,CLASS = class2] 


entries that have the 




£,COPY = number of copies] 


first n characters of 




Q,REMOTE=remid] 


their jobnames in 
common, "abc" 
represents any 
combination of from 
one to seven 
alphameric characters, 
class 1: specifies class of job 
entries to be altered. 
Can be any alphabetic 
charcater (A-Z) and for 
input classes also from 
0-4. 
priority : A single digit from 
to 9. Nine is the 
highest priority, 
disposition ; can be H,K,L or D. 
class 2: any alphabetic character 
(A-Z). Also,specifications 
from through 4 are 
allowed for input classes, 
number of copies : can be from 

0to99. 
remid : can be specified as any 
number from to 200. 
'0' indicates the central 
location. 


JpdeleteI 




queue, jobname H jobnumber]] 


queue : LST, PUN or RDR. 


\l 1 




queue, ALL 


jobname :Can be 2 to 8 alphameric 






queue, class > 


characters. 






queue, *abc 


jobnumber : Can be 1 to 5 digits 






MSG T/nf 


long 






*abc : All job entries with the 






same first n charcater, 






are to be deleted, "abc" 






represents any combination 






of up to seven alphameric 






characters . 






MSG, n : ALL USERS-type 






message number n is 






to be deleted. 



POWER/VS OPERATOR COMMAND LANGUAGE (POCL) (. . .Continued) 



Queue Management commands (continued) 



Operation 


Operand 


Comments 


JpdisplayI 




queue, jobname [", jobnumber] 


queue : LST, PUN or RDR 


l D J 




queue QALL] 


jobname : Can be 2 to 8 






queue, HOLD 


characters. 






queue, FREE 


jobnumber : Can be 2 to 5 






queue, RJE [,remidj 


digits 






queue, LOCAL 


ALL : If queue parameter is 






queue, *abc 


not specified, status 






queue, class 


information on all 






ALL Qlistaddr] 


entries in all queues 






HOLD 


is displayed on SYSLOG. 






FREE 


listaddr : Its format is : 






RJE [Jremid] 


cuu or X'cuu'. 






LOCAL 


class : Can be specified as a 






*abc 


character from A through 






MSG 


Z or from to 4 (input 






A 


class only). 






M 


*abc : specifies a request for the 






Q 


status of all job entries 
having the first n 






characters of their job- 






names in common, "abc" 






represents any combina- 






tion of from one to seven 






alphameric characters. 






If the queue parameter 






is not specified, status 






information is displayed 






for all queues. 


(pre lease! 


1 queue, jobname [", jobnumber] 
1 queue [J, ALL] 


queue : LST, PUN or RDR. 


1 R J 


jobname : Can be 2 to 8 






queue, class 


alphameric 






queue, *abc 


characters, 
jobnumber : Can be 1 to 5 






digits long. 






*abc : all job entries with the 






same first n characters 






are to be released. 






"abc" represents any 






combination of up to 






seven alphameric 






characters. 



POWER/VS OPERATOR COMMAN PS LANGUAGE (POCL) (...Continued) 
Miscellaneous commands 



Operation 


Operand 


Comments 


/pin quire! 


1 lineaddrl 

(all ) 


lineaddr : Its format is : 
cuu or X'cuu' 
ALL : Status of all supported 

lines are to be 

displayed 


J pbrdcst] 


remid, 'text' 


remid : Can be from 1 to 

200. A specification 
of ALL USERS 
indicates all users. 

'text': Can be 1 to 40 
characters. 


JpaccountI 




tapeaddr £ f i lename J 
DISK, filename 
DEL 




If no operands specified, the 
account file is spooled to disk, 
tapeaddr : Can be : 

X'cuu' 

X'cuu'ss 
cuu'X'ss 
X'cuu',X'ss' 
filename : If specified, the file 
created will be a 
standard labeled tape 
file. May be 1 to 8 
alphameric characters 
long. 
DISK, filename : "filename" is 
1 to 8 alpha- 
meric 
characters long 


PSETUP 


uraddr f,nl 


uraddr : Its format is : 
cuu or X'cuu' 

n : one or two digits that 
specify the number of 
pages to be printed. 



POWER/VS REMOTE OPERATOR COMMAND LANGUAGE (ROCL) 

There are four types of commands : 

* Terminal control commands. Start and stop user sessions. 

* Task management commands. Apply to RJE write tasks. (The RJE read 
task is started by the central operator when he brings up the line, and 
its operation is controlled by the system, as are execution processors.) 

* Queue management commands. Apply to jobs that are submitted by 
or routed to the same remote-id as the one issuing the command. 

* Miscellaneous commands. Print page layouts or transmit messages. 
The following table includes all valid commands. 



Type 


Command 


Function 


Terminal 


* .. SIGNON 


start a user session 


control 


* .. SIGNOFF 


terminate a user session 


Task 


* . . START 


start a writer or start message 


management 




generation 




* . . STOP 


stop a writer or stop message 
generation 




* .. GO 


re-activate a write task 




* .. FLUSH 


flush an activate job entry 




* . . RESTART 


restart a writer 


Queue 


* .. DISPLAY 


display a job status 


management 


* .. ALTER 


alter job attributes 




* . . DELETE 


delete a job or a message 




* .. RELEASE 


release a job 


Miscellaneous 


* . . BRDCST 


transmit a message 




* .. SETUP 


print page layout 



POWER/VS RJE terminal commands are entered on punched cards through the 
reader- at the terminal. They must be submitted outside POWER/VS job boundaries, 
otherwise- they are treated as user data. 

Each RJE command consists of the following fields : 

1. Identification field. Contains an * in column 1, blank in column 2, and 
. . (periods) in columns 3 and 4. Column 5 must be blank. 

2. Operation field. Specifies the RJE command. At least one blank must 
separate this field from the following field. 

3. Operand field. Contains one or more parameters, separated by commas. 
At least one blank must separate the operand field and the comments 
field. 



POWER/ VS REMOTE OPERATOR COMMAND LANGUAGE (ROCL) (. . ■ Continued) 



Comments field. May contain any information considered helpful by the 
user. Continuation of the comments field is not allowed. 

The operation field, operand field, and comments field must be contained 
in columns 6 through 71. Column 72 must be blank. 

Sequence field. Sequence numbers are useful when a number of commands 
with the same operation code are submitted from a terminal. Columns 
73 - 80 are returned in diagnostic messages. 



Terminal commands 



Operation 


Operand 


Comments 


* . . SIGNON 


remid f, password Tuser information 


remid : Remote users are 
identified by 
numbers from 
1 to 200. 
password : Can be any 
combination 
of up to eight 
alphameric 
characters, 
user information : Up to 16 
bytes of 
user 

information, 
punched in 
columns 
56 to 71 . 


* . . SIGNOFF 







Task Management commands 



Operation 


Operands 


Comments 


* . . START 


ftask 1 


task : LST or PUN 




< task, class > 


class : Up to four classes can 




[MSG J 


be designated by 
specifying one to four 
alphabetic characters 
from A through Z. 
MSG: specifies that all 

subsequent broadcast 
messages directed to 
this terminal are to be 
accepted. 
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Task Management commands (continued) 



Operation 


Operands 


Comments 


* . . STOP 


("task "I 
1 task, EOJ 1 
] task, RESTART f 

[msg J 


task: LSTorPUN. 
EOJ: Stop until current entry 
has completed 
processing. 
RESTART : When the task is 
started again, 
processing will 
begin at the record 
following the last 
one processed 
before the STOP 
comment was issued. 
MSG: All subsequent broad- 
cast messages directed 
to the terminal are to 
be ignored. 


* .. GO 


task 


task : LST or PUN 


* .. FLUSH 


ftosk 1 
\task, HOLD/ 


task : LST or PUN 


* . . RESTART 


fc.} 


task : LST or PUN 
n : Signed or unsigned value 
from to 9999. 



Queue Management commands 



Operation 


Operands 


Comments 


* .. DISPLAY 




'queue, [obname L jobnumberl 


queue : LST, PUN or RDR 






queue [^ALL] 


jobname : Can be two to eight 






queue, HOLD 


alphameric 






queue, FREE 


characters 






queue, *abc 


jobnumber : One to five digits 






queue, class 


long. 






ALL 


class : Can be specified as an 






HOLD 


alphameric character 






FREE 


from A through Z, or 






*abc 


from 0. to 4. 






MSG 


*abc : Requests the status of 






all entries having the 






first n characters of 






their jobnames in 






common. 
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Queue Management commands (continued) 



Operation 


Operands 


Comments 


* .. DISPLAY 
(continued) 




"abc" represents any 
combination of from 
one to seven characters. 
If the queue parameter 
is not specified, status 
information is displayed 
for all queues. 
MSG : Requests the display of 
all ALLUSERS-type 
messages that have been 
entered, together with 
their originators and all 
operator messages routed 
specifically to this 
remote-id. Operator 
messages are automatically 
deleted when they are 
displayed. 


* . . ALTER 


fjobname Tjobnumberl | 
queue<ALL V 
*abc 

Idass 1 > 
[,PRI=priority] 
tDISP=disposition] 
QCLASa=class 2j 
[, COPY=number-of-copies] 
[,REMOTE=remid] 


queue : LST, PUN or RDR. 

jobname : Can be two to eight 
alphameric 
characters. 

{obnumber : May be one to five 
digits long. 

priority : Specified as a single 

digit from to 9. Nine 
is the highest priority. 

disposition : Can be specified 
as H, K, L, or D. 

class 1 : class of which all job 

entries are to be altered 

class 2 : can be specified as 

any alphabetic character 
from A through Z. Also, 
specifications from 
through 4 are allowed 
for input classes. 

remid : can be specified as any 
number from to 200. 
"0" indicates the central 
location. Only the "to" 
remote-id can be modi- 
fied with an ALTER 
command; the "from" 
remote-id cannot be 
modified. 
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Queue Management commands (continued) 



Operation 


Operands 


Comments 


* .. DELETE 


[queue, jobnameT, jobnumberl"l 

queue, ALL 
< queue, class V 

queue, *abc 
[MSG[,n] J 


queue : LST, PUN or RDR. 
jobname : Can be two to 

eight alphameric 
characters, 
jobnumber : The jobnumber is 
from one to five 
digits long. The 
DISPLAY command 
can be used to 
obtain the job- 
number. 
*abc: All job entries with the 
same first n characters 
are to be deleted, 
"abc" represents any 
combination of up to 
seven alphameric 
characters. 
MSG,n: "n" is the message 
number. If n is 
omitted, all 
ALLUSERS-type 
messages that were 
entered from this 
remote-id are 
deleted. 


* .. RELEASE 


f* queue, jobnameLjobnumberJI 
1 queue [,ALL] 1 
| queue, class | 
[^queue, *abc J 


queue : LST, PUN or RDR 
Jobname : Can be two to eight 

alphameric 

characters, 
jobnumber : The jobnumber is 
one to five digits 

*abc : All job entries with the 
same first n characters 
are to be released, 
"abc" represents any 
combination of up to 
seven alphameric 
characters. 
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Miscellaneous commands 



Operation 


Operands 


Comments 


* . . BRDCST 


remid, 'text' 


remid : Remote users can be 
identified by numbers 
from 1 to 200. A 
specification bf 
indicates the fcentral 
location, and a 
specification bf 
ALLUSERS indicates 
all users. 

'text': The message can 

consist of from 1 to 40 
characters enclosed 
in single quotation 
marks. A single 
quotation mark within 
the message must be 
written as two quotation 
marks . 


* . . SETUP 


LST [,„] 


n : one or two digits that 

specify the number of pages 
to be printed. 



POWER/VS JOB ENTRY CONTROL LANGUAGE (JECL) 



The following table shows the JECLstataments and their functions : 



JECL Statement 


Function 


*$$CTL 


Specifies a default input class 


* $$ JOB 


Indicates the beginning of a POWER/VS job and provides 




handling information 


* $S EOJ 


Indicates the end of a POWER/VS job 


* SS RDR 


Inserts a diskette file into the input stream 


* S$ LST/ * $$ PR7 


Provides handling information for printed output 


* $$ PUN 


Provides handling information for punched output 


* U SLI 


Inserts data from a sublibrary into the job stream 


*$$/* 


Used in a source statement library book to indicate the 




end of a DOS/VS job step ( used for the SLI statement 

only) 

Used in a source statement library book to indicate the 


*$$/& 




end of a DOS/VS job (used for the SLI statement only) 


* $$ DATA 


Inserts data into a book retrieved from a source 




statement library. 



Each JECL statement consists of the following fields. 

1. Identification field. Contains the characters * $$ (asterisk-blank-dollar- 
dollar) in columns 1 through 4. 

2. Operation field. Specifies the JECL operation. It can directly follow the 
second dollar sign or be separated from the second dollar sign by one or 
more blanks. At least one blank must be placed between the operation field 
and the operand field. 

3. Operand field. Contains one or more keyword or positional parameters, 
separated by commas. Keyword and positional parameters cannot be mixed 
within one statement. 



Comments field. Can contain any informatic 
user. 



considered helpful by the 



Sequence field. Contains up to eight characters of optional information 
used for control statement identification. If present, the sequence field is 
positionally dependent and must be coded starting in column 73. 
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Operatio 



Operand 



■M 

[CIOBSJ 



Class : Can be specified as an 
alphameric character 
from A-Z or 0-4. 



lAUTONAME 



[jobname 

DISP -(aTsposition} 
,PRI = priority! 
[, CLASS = classj 
,USER = user-information | 
positional form 

[autoname"] 

|_ Opposition I 
,£ priority] 
,£ class] 



jobname : A JECL jobname 
specification can 
be from 1 to 8 
alphameric 
characters, 
beginning with an 
alphabetic 
character. 

dispostion : D, H, K or L. 

priority : It is specified as a 
single digit from 
to 9. Nine is the 
highest priority. 

class : It can be specified as 

an alphameric character 
from A-Z or 0-4. 

user-information : 

Up to 16 bytes of user information 

can be specified, within quotes, 



*$$ EOJ 



keyword form : 



DEV = phys. unit number 
CFID= file-id] 

|J ~ number of diskettes] 

[.vsc-$g] 



|>-3§] 



Physical unit-number 

r_i_i 

' number of diskettes 



Physical-unit number : 

Parameter is used for Data -mode 

processing. 

Omitted for SYS IN -processing. 

Identifies the physical unit 

number of the diskette either 

in the form X'cuu' or cuu. 

File id : 

Specific file name as appears 

in the HDR1 label on the 

diskette. 

Can be one to eight alphameric 

characters between quotes. 

Number of diskettes : 

One to three digits can be 

specified. 

VSC : Volume sequence 

numbers must start with 

1. 
S : same as for VSC. 
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Operation 



keyword form : 



■»W 



[_ [disposition 

[^,REMOTE=remid] 

|_ Iforms-number 

[,JSEP=sep] 

L' ~~ \number-of-copiesj 

Q,RBM= (norbm 1, norbm 2)] 

QUAB = linetab] 

QRBS=norbsl 

I , UCS=(phasename I", option] ) 

f", FCB=phasename] 

[,LST=listaddr] 



•«{s) 



["disposition |_~cTass] 

forms-number 

jnumber-of-copies I 
(tapeaddr) 
norbm lj 
,[]linetab] 



disposition : D,H,K,L,N or T. 
remid : Can be a number from 
to 200. (0 is central 
installation.) 
forms-number : Can be one to 
four alphameric 
characters long, 
sep : Can be to 9. 
number-of -copies : Can be one 
or two 
digits long 
tapeaddr : Can be 
cuu 
X'cuu' 
cuu,X'ss' 
X'cuu'^'ss' 
cuu,ss 
X'cuu'jSs 
norbm 1 : This paramater is one 

to six digits long, 
norbm 2 : The number is one to 

six digits long, 
linetab : This parameter is 26 
digits long ; each 
subparameter is two 
digits. The format of 
linetab is : 
d0,dl,d2, ... dl2 
norbs : This parameter can be 
one to six digits long. 
A zero means that no 
segmentation will take 
place, 
phasename : The format of the 
parameter is 
(phasename, option), 
where "option" 
can be specified 
as F, C, CF, or FC. 
listaddr :The address can be 
either in the form 
SYSxxx, where xxx 
is LST or any valid 
programmer logical un 
unit ; or in the form 
cuu (or X'cuu'). 
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Operatior 






keyword form : 

^REMOTE = remid] 

[ FN0 Jp fc )] 

L_ I forms -number I 

[,JSEP=sep] 

,COPY=|- . r 

Inumber-ot -copies | 

[,TADDR=<tapeaddr)] 

QRBM=(norbm 1, norbm 2)1 

QPUN=punaddr] 

r,RBS = norbs| 

positional form : 




disposition : D,H,I,K,L, N 

orT. 
class : Can be specified as any 

alphabetic character, 
remid : Can be a number from 
to 200. Numbers 1 to 
200 are specific remote 
users. If remid is 0, 
punch output is directed 
to the central installation, 
forms-number : One to four 
alphameric 
characters long . 
sep : Number of job separator 

cards (0 to 9). 
number-of -copies : One or two 
digits long, 
tapeaddr : Format : 
cuu 
X'cuu' 
cuu,X'ss' 
X'cuu'^'ss' 
cuu,ss 
X'cuu',ss. 
norbm 1 : One to six digits long, 
norbm 2 : One to six digits long, 
punaddr : The address can be 
either in the form 
SYSxxx where xxx is 
PCH or any valid 
programmer logical 
unit ; or in the form — 
cuu ( or X'cuu 1 ). 
norbs : Can be one to sixdigits 
long. A zero means that 
no segmentation will 
take place. 



At execution time, the *$$ SLI 
(source library inclusion) statement 
causes the private and system 
source libraries to be searched 
for a book, which, when found, 
is inserted into the job stream. 
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Operation 


Operand 


Comments 


*$$/* 






*$$/& 






* $$ DATA 


name 


name : can be from one to eight 
alphameric characters, 
the first character must be 
alphabetic. 



POWER/VS CONTROL BLOCKS 



CONTROL ADDRESS TABLE (CAT) 



Included by definition macro IPWSSDPA for the permanent area. 

This table consists of a set of tables, addresses and constants in the permanent 
area of the POWER/VS partition, used to link the component routines of the 
POWER/VS subsystem during execution. 



Bytes 




Description/function of field 






Dec 


Hex 








Control address table 


00-15 


00-0F 


Storage descriptor (CAT) 


16-19 


10-13 


POWER/VS master ECB 


20-23 


14-17 


Start address POWER/VS partition 


24-27 


18-1B 


Start address fixable area 


28-31 


1C-1F 


Start address pageable area 


32-35 


20-23 


End address POWER/VS partition + 1 


36-39 


24-27 


Start address LTA 


40-43 


28-2B 


End address LTA +1 


44-47 


2C-2F 


Address of POWER/ VSP IB 






Relocation constant 


48-51 


30-33 


Relocation constant used by initiator to calculate 
the relocation factor for addresses in the 
following tables. (To enable POWER/VS to be 
loaded in any partition.) Value = X'170'. 






External interface addresses 


52-55 


34-37 


Attention interface 


56-59 


38-3B 


Page fault appendage 


60-63 


3C-3F 


Hot reader routine 


64-67 


40-43 


RJE CE appendage 


68-71 


44-47 


SVC appendage 


72-75 


48-4B 


SVC 90/91 appendage 






Resource control block addresses. These addresses 






are collectively referenced by label CAFR. 


76-79 


4C-4F 


Disk management block 


80-83 


50-53 


Account control block 


84-87 


54-57 


Storage control block 


88-91 


58-5B 


Message control block 
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CONTROL ADDRESS TABLE (CAT)(. . .Continued) 



Bytes 


Description/function of field 


Dec 


Hex 






Module control block address table 

The addresses in this table are used by the disk 
services and are established when the POWER/VS 
disk files are opened at system start-up time. 


92-95 

96-99 

100-103 

104-107 

108-111 

112-115 

116-119 

120-123 

124-127 


5C-5F 
60-63 
64-67 
68-6B 
6C-6F 
70-73 
74-77 
78-7B 
7C-7F 


Accounting module 
MCB queue file 
MCB data file module 1 
MCB data file module 2 
MCB data file module 3 
MCB data file module 4 
MCB data file module 5 
MCB private SSL 
MCB system SSL 






Task state values and addresses of state processing 
routines 

These constants are used by the task management 
macro instructions to set values within the task 
selection fields of the task control blocks. 


128-131 
132-135 
136-139 
140-143 
144-147 
148-151 
152-155 
156-159 
160-163 
164-167 
168-171 
172-175 


80-83 
84-87 
88-8B 
8C-8F 
90-93 
94-97 
98-93 
9C-9F 
A0-A3 
A4-A7 
A8-AB 
AC-AF 


The task is inactive, task not selected 

Branch to TM10 

Page fault in process, task not selected 

Branch to TM10 

Wait for operator, task not selected 

Branch to TM10 

Wait on locked resource, test lockword 

Branch to TM30 

Wait on LTA/PTA, tets control blocks 

Branch to TM55 

Wait on multiple posting, test control blocks 

Branch to TM50 

Wait on class table posting, test control blocks 

Branch to TM50 

Wait on single posting, test control block 

Branch to TM80 

Wait on space posting, test control blocks 

Branch to TM80 

Immediate dispatch, dispatch the task 

Branch to TM90 

Wait state. Used for WCB only. 

Wait routine. Branch to TM20. 

The task is running, no selection address 
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CONTROL ADDRESS TABLE (CAT) (. . . Continued) 



Bytes 


Description/function of field 


Dec 


Hex 






Permanent TCB addresses 


176-179 
180-183 
184-187 
188-191 


B0-B3 
B4-B7 
B8-BB 
BC-BF 


Wait control block 
Command processor TCB 
Initialization/termination TCB 
Line manager TCB 






Task control address table 


192-195 
196-199 

200-203 
204-207 
208-211 
212-215 


C0-C3 
C4-C7 

C8-CB 
CC-CF 
D0-D3 
D4-D7 


Task identifying prefix (L) and the address of the 

TCB of the line manager (or of the wait control 

block if the line manager is not present). 

Task identifying prefix (O) and the address of the 

TCB of the most recently attached auxiliary 

command processor (or of the permanent command 

processor if no auxiliary command processor 

presently exists). 

Task identifying prefix (X) and the address of the 

TCB of the most recently attached remote (RJE) 

reader/writer. 

Task identifying prefix (W) and the address of the 

TCB of the most recently attached local writer 

task. 

Task identifying prefix (E) and the address of the 

TCB of the most recently attached execution 

processor task. 

Task identifying prefix (R) and the address of the 

TCB of the most recently attached reader task. 


216-219 


D8-DB 


X'FFOOOOOO' (list delimiter) 






Module load addresses (listed as loaded in the 
pageable area) 


220-223 
224-227 
228-231 
232-235 
236-239 
240-243 
244-247 
248-251 
252-255 
256-259 
260-263 
264-267 
268-271 


DC-DF 

E0-E3 

E4-E7 

E8-EB 

EC-EF 

F0-F3 

F4-F7 

F8-FB 

FC-FF 

100-103 

104-107 

108-10B 

10C-10F 


Command processor 
Physical reader 
Put data record function 
Logical reader 

Scan and check parameter function 
Get data record function 
Physical list 
Logical writer 
Physical punch 
Execution reader 

Get data record function (copy 2) 
Execution writer 
Put data record function (copy 2) 
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CONTROL ADDRESS TABLE (CAT) (...Continued) 



Bytes 






Dec 


Hex 








Module load addresses (listed as loaded in the 
pageable area) ( continued) 


272-275 
276-279 
280-283 
284-287 
288-291 
292-295 
296-299 
300-303 
304-307 
308-311 
312-315 
316-319 
320-331 
332-335 
336-339 
340-343 
344-347 
348-351 
352-355 
356-359 


110-113 
114-117 
118-llB 
11C-11F 
120-123 
124-127 
128-12B 
12C-12F 
130-133 
134-137 
138-13B 
13C-13F 
140-14B 
14C-14F 
150-153 
154-157 
158-15B 
15C-15F 
160-163 
164-167 


JBCL analysis 
Reserve queue function 
Add to queue function 
Get next from queue function 
Delete from queue function 
Free queue function 
LUB/PUB update function 
Print queue status report 
Pass internal command 
Task terminator 
3540 Physical reader 
3540 OPEN function 
Reserved 
Remote job entry 
Remote message handler 
User reader exit routine 
Put account function 
Get account function 
Save account function 
Get SSI function 


optional phases 






Service routine branch table 

The branch instructions are used to transfer control 
from service routine macro instructions to the 
appropriate service code. 


360-363 
364-367 
368-371 
372-375 
376-379 
380-383 
384-387 
388-391 
392-395 
395-399 
400-403 
404-407 
408-411 
412-415 
416-419 
420-423 
424-427 


168-16B 
16C-16F 
170-173 
174-177 
178-17B 
17C-17F 
180-183 
184-187 
188-18B 
18C-18F 
190-193 
194-197 
198-19B 
19C-19F 
1A0-1A3 
1A4-1A7 
1A8-1AB 


Attach task 

Detach task 

Task selection 

Initial task entry 

Reserve resource 

Release resource / 

Reserve workspace 

Release work space 

Message service 

Set write command code 

Disk service 

Set read command code 

Disk service 

Tcpe service 

Timer service 

Remote message service 

Address indication service 



POWER/ VS CONTROL BLOCKS (...CONTINUED) 



CONTROL ADDRESS TABLE (CAT) (. . .Continued) 



Bytes 


Description/function of field 


Dec 


Hex 






Block length table 

The table is used by the IPWSRSW macro instruction 
to identify the size of work space required to 
accommodate certain control blocks. 


428-431 
432-435 


1AC-1AF 
1B0-1B3 


Data buffer - set by IN IT (amount of storage 

required to accommodate the data block) 

Data block - set by IN IT (size of record written to 

disk) 






Miscellaneous non-relocatable constants 


436-439 
440-443 


1B4-1B7 
1B8-1BB 


Line control block address 
Reserved 






Statistical information 


444-445 
446-447 
448-451 
452-455 
456-459 
460-463 
464-467 
468-471 
472-475 
476-479 
480-483 
484-487 
488-491 
492-495 


1BC-1BD 
1BC-1BF 
1C0-1C3 
1C4-1C7 
1C8-1CB 
1CC-1CF 
1D0-1D3 
1D4-1D7 
1D8-1DB 
1DC-1DF 
1EQ-1E3 
1E4-1E7 
1E8-1EB 
1EC-1EF 


Highest remote-id 
Number of lines 
Total number of queue records 
Number of free queue records 
Maximum number of queue records used 
Total number of tracks data file 
Number of free tracks data file 
Maximum number of tracks used 
Number of times waiting for storage 
Total number of pages allocated 
Current number of pages allocated 
Maximum number of pages allocated 
Current number of tasks 
Maximum number of tasks 






Fullword constants 


496-499 
500-503 
504-507 
508-511 


1F0-1F3 
1F4-1F7 
1F8-1FB 
1FC-1FF 


FT 
F'4' 
F'8' 
F'24' 






Translation tables 


512-767 
768-1023 


200-2FF 
300-3FF 


This table is used to scan sequences of blank 
characters for the first non-blank character and 
also as a source of blank characters for various 
program purposes. 

This table is used to scan sequences of non-blank 
characters for the first blank character and also as a 
source of zero characters for various program 
purposes . 



How to locate : 



Start of POWER/VS partition + X'140'. 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 



WAIT CONTROL BLOCK (WCB) 



Bytes 


Description/function of field 






Dec 


Hex 




00-15 


00-0F 


Storage descriptor (WCB) 


16-19 


10-13 


Reserved 


20-23 


14-17 


Address of TCB belonging to task with highest 
priority in TSL 


24-27 


18-1B 


Page fault request word - always zero 


28-31 


1C-1F 


Task selection field 

Byte : X'E6' 

Byte 1-3 : Address of routine that tests if a 

POWER/VS event is posted in main 
ECB. If no event, it places the 
POWER/VS partition in wait state 
by issuing an SVC 7 to DOS/VS 
supervisor. 



How to Locate : Displacement X'B0-B3' of the CAT contain 

to the WCB . 



a pointer 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
STORAGE CONTROL BLOCK (SCB) 
Definition macro : IPW$DSC 



Bytes 




Description/ function of field 








Dec 


Hex 






00-15 


00-OF 


Storage descriptor (SCB) 


16-19 


10-13 


Last permanent page 




20-23 


14-17 


First fixed page 




24-27 


18-1B 


Event control block 




28-31 


1C-1F 


Lockword 




32-35 


20-23 


Task register 14 






36-39 


24-27 


Task register 15 






40-43 


28-2B 


Task register 






44-47 


2C-2F 


Task register 1 


© 




48-51 


30-33 


Task register 2 




52-55 


34-37 


Task register 3 






56-59 


38-3B 


Task register 4 






60-63 


3C-3F 


Task register 5 






64-127 


40-7F 


Storage assignment table (2J 


128-135 


80-87 


Constant to initialize the first BCW 








(see Figure 5.21) in a new fixed page 


in the 






fixable area. 




136-143 


88-8F 


Constant to initialize the last BCW in 


a new 






fixed page in the fixable area (see F? 


gure 5.21) 






Page fix/free work area ® 


144-147 


90-93 


Page virtual address (3) 




148-151 


94-97 


Page length (-1) ® 




152-155 


98-93 


End-of-list indicator (X'FFOOOOOO') 




156-159 


9C-9F 


Reserved 





(T) Since the storage management routines are used to provide register save areas 
for task use, the storage control block must contain a register save area for use 
by the storage management routines. 

(2) The storage assignment table is like a map of the fixable area within the 

POWER/VS address space in which each page control byte represents a single 
page of address space. Each byte within the table takes one of four values. 

X'00' Page free (and not last page) 

X'40' Page free (and last page) 

X'80' Page in use (but not last page) 

X'CO' Page in use (and last page) 



POWER/VS CONTROL BLOCKS (. ..CONTINUED) 
STORAGE CONTROL BLOCK (SQ3) (. .Continued) 



The storage assignment table is defined with all pages free and is 
properly initialized by the POWER/VS start-up routines to reflect the 
amount of real storage available to the POWER/VS partition at that 



(3) Three fullwords used as a work are by the page-fix and page-free 

routines. The first word is used to contain the address of the first byte 
of the page to be fixed or freed; the second word contains binary 2047 
(page size minus one) ; and the third word contains X'FF' in its high-order 
byte to act as a list terminator. 



How to Locate : Displacement X'54-57" of CAT contains a pointer to the SCB. 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
MESSAGE CONTROL BLOCK (MMB) 
Defintion macro : IPW$DMM 



Bytes 


Description/function of field 


Dec 


Hex 


00-15 


00-0F 


Storage descriptor (MMB) 


16-23 
24-27 
28-31 


10-17 
18-1B 
1C-1F 


Work area 

Reserved 

Lockword 






CCB 


32-33 

34-35 

36-37 

38-39 

40 

41-43 

44-47 


20-21 

22-23 

24-25 

26-27 

28 

29-2B 

2C-2F 


Residual count 

Communication bytes 

Status bytes 

LUB identifier 

Flags 

Channel program address 

DOS/VS infernal use 






Channel program 


48-55 
56-63 


30-37 
38-3F 


Write CCW 
Read CCW 


64-135 


40-87 


Message output area 


136-183 
184-187 
188-191 


88-B7 
B8-BB 
BC-BF 


Reply input area 

Save area for register 5 

Constant of character ObOP 



How to Locate : Displacement X'58-5B' of the CAT contains a pointer to 
the MMB. 



POWER/VS CONTROL BLOCKS (...CONTINUED) 



DISK MANAGEMENT BLOCK (DMB) 
Definition macro : IPWSDQC 



The disk management block area is used to control access to the POWER/VS 
queue file. It is located in the permanent area of the POWER/VS partition. 

The disk management block is divided into the following areas : 

o Resource control fields 

o File control fields 

o Record control fields 

o Master record area 

o Auxiliary account record area 

o Auxiliary queue record area 

o Master class table area . 

Detailed Description of Fields : 



Bytes 


Description/function of field 


Dec 


Hex 






Resource control fields 

They are used to manage the resources contained 
within the DMB 


00-15 
16-23 
24-27 
28-31 


00 -OF 
10-17 
18-1B 
1C-1F 


Storage descriptor (DMB) 

Reserved 

Event control block 

Lockword 






File control fields 

They contain parameters relating to queue file, 
data file, and, if used, private and system SSL 


32-35 
36-39 
40-87 
88-95 

96-99 
100-103 
104-127 
128-159 

160-163 
164-167 
168-215 
216-223 


20-23 
24-27 
28-57 
58-5F 

50-63 
64-67 
68-7F 
80-9F 

A0-A3 
A4-A7 
A8-D7 
D8-DF 


Number of records/track queue file Q) 
Number of tracks/cylinder queue file (2) 
Queue file sector table 
Reserved 

Number of records/track data file Q) 
Number of tracks/cylinder data file (?) 
Track group control table 
Data file sector table 

Number of records/track SSL Q) 
Number of tracks/cylinder SSL (2) 
SSL sector table 
Reserved 



POWER/VS CONTROL BLOCKS (. . . CONTINUED) 
DISK MANAGEMENT BLOCK (DMB) (Continued) 



Bytes 


Description/function of field 


Dec 


Hex 






Record control fields 

They contain information used to read and write 
records to and from the master record area and 
auxiliary queue record area. 


224-231 
232-235 
236-239 
240-247 
248-251 
252-255 


E0-E7 
E8-E3 
EC-EF 
F0-F7 
F8-FB 
FC-FF 


Master record seek address (MBBCCHHR) 

Real master area address 

Virtual master area address 

Queue record seek address (MBBCCHHR) 

Real auxiliary queue record area address 

Virtual queue, record area address 






Master record area 

The master record is written as the first physical 
record within the queue file extent. During 
POWER/VS execution a copy of the master record 
is maintained in this area. Whenever this copy is 
updated a replacement master record is at once 
written to the queue file so that, in the event of a 
failure of the system, warm start information can be 
recovered from the direct access device in question. 


256-263 

264-267 

268-271 
272-275 

276-279 


100-107 

108-10B 

10C-10F 
110-113 

114-117 


Date 

These eight bytes contain the date of POWER/VS 
execution in the format chosen at system generation 
(dd/mm/yy or mm/dd/yy). 

POWER/VS start time 

These four bytes contain the start time of 

POWER/VS execution in packed decimal format. 

Reserved 

Data block size 

This fullword contains a fixed-point binary value 
representing the block size of the data blocks 
within the data file. 

Track group size 

This fullword contains a fixed-point binary value 
representing the number of tracks within each track 
group within the data file. 



POWER/VS CONTROL BLOCKS (...CONTINUED) 



DISK MANAGEMENT BLOCK (DMB) (Continued) 



Bytes 


Description/ function of field 


Dec 


Hex 


280-281 


118-119 


Version and modification level 

Two numeric characters representing the version and 

modification level of POWER/'VS used. 






Programming Note : The following 6 switch bytes 
preserve the options established by the POWER/VS 
user at the time he generated his version. 


282 

283 

284 
285 

286 
287 


11A 

1 IB 

11C 
11D 

he 

11F 


Source library switch 

This byte contains a single alphabetic character 
representing the source statement sublibrary to be 
associated, unless otherwise specified, with any 
JECL SLI statements encountered in the read queue. 

Job accounting switch 

This byte contains a single alphabetic character ; 
the character A indicates that POWER/VS job 
accounting is required; a blank character indicates 
that POWER/VS accounting is not required. 

Reserved 

LOG option switch (set to character L if JLOG=YES 
and blank if JLOG=NO) 

Termination status. Contains character A for 
incomplete session or abnormal termination. 
Otherwise, it contains character N, meaning 
normal termination. 
Note : It will contain an A during the session. 

Reserved 






Programming Note : The following 14 bytes contain 
standard POWER/VS default values used when new 
queue records are created. 


288-295 
296-297 


120-127 
128-129 


Default Job name 

These eight bytes contain the character string 

'AUTONAME' used as a default job name. 

Master job number 

This halfword contains a fixed-point binary value 
representing the next job number to be assigned by 
POWER/VS. It is incremented by one each time it 
is used. 



POWER/ VS CONTROL BLOCKS (...CONTINUED) 
DISK MANAGEMENT BLOCK (DMB) (Continued) 



Bytes 


Description/function of field 


Dec 


Hex 


298 
299 

300 

301 
302-303 


12A 
12B 

12C 

12D 
12E-12F 


Master queue identifier 

This byte contains the alphabetic character M to 

show that this is the master record. 

Default class attribute 

This byte contains the alphabetic character A 
representing the class attribute to be given by 
default to each RDR queue entry created within 
POWER/ VS. 

Default priority attribute 

This byte contains numeric character 3 which 
defines the priority attribute to be given by 
default to each queue entry created by 
POWER/ VS. 

Default cancel code 

This byte contains the hexadecimal characters 

X'10 1 representing normal end of job and task 

Reserved 






Programming Note : Next 16-byte field contains the 
master line table, consisting of system default 
values used to analyse space and skip operations 
during printer control carriage simulation. 


304-319 


130-13F 


Line table 






Programming Note : Next 16 bytes contain the 
master list values, which will be inserted by default 
in list queue records, unless overridden by a 
JECL statement. (Values are set by IPWSSll using 
those specified by user during POWER/VS 
generation (JSEP=, RBS=, STDLINE= )) 


320-322 

323 

324-327 

328-331 

332-335 


140-142 

143 

144-147 

148-14B 

14C-14F 


Reserved 

Number of separators 
Records before segmentation 
Records before message 
Records before message 






Programming Note : Next 16 bytes contain the 
master punch values, which will be inserted by default 
in punch queue records, unless overridden by a 
JECL statement. (Values set by IPWSSll using those 
specified by user during POWER/VS generation. 
(JSEP=, RBS=, STDCARD=)) 



POWER/VS CONTROL BLOCKS (...CONTINUED) 
DISK MANAGEMENT BLOCK (DMB) (Continued) 



Bytes 


Description/function of field 


Dec 


Hex 


336-338 

339 

340-343 

344-347 

348-351 


150-152 

153 

154-157 

158-15B 

15C-15F 


Reserved 

Number of separators 
Records before seqmentation 
Records before message 
Records before next message 






Programming Note : Next 10 bytes contain account 
file values. 


352-359 
360-361 
362-375 


160-167 
168-169 
16A-177 


Account file seek address (MBBCCHHR) 

Contains the direct access storage seek address of the 

last record in the POWER/VS account file. 

Account file record maximum size 

Binary value representing the length of the longest 

record so far written to the account file. 

Reserved 






Programming Note : Next 32 bytes contain free 
queue pointers. 


376-383 
384-407 


178-17F 
180-197 


First record in free queue (MBBCCHHR) 
Reserved 






Auxiliary account record area 

This area actually overlaps the auxiliary queue 
record area, because the account record consists 
of the first part of the queue record which is built 
in that area. All account records except execution 
account are transferred from here to the account 
file as standard variable length records. 


408-415 


198-19F 


Block and record length 

This record control field is used for sequential 
access method. 






Auxiliary queue record area (152 bytes) 
This area is required as a work space for an additional 
queue record. For example, for updating class chain 
addresses during the add to queue function. The first 
part (96 bytes) of the Q record contains body fields 
(information pertinent to this particular queue entry 
and the user job which created it). 



POWER/ VS CONTROL BLOCKS (. . .CONTINUED) 
DISK MANAGEMENT BLOCK (DMB) (Continued) 



Bytes 


Description/function of field 




Dec 


Hex 


416-423 


1A0-1A7 


Date in format specified at SYS GEN 
(mm/dd/yy or dd/mm/yy) 


424-427 


1A8-1AB 


Operation start time, in packed decimal 
(OHHMMSSF ; F = sign) 




428-431 


1AC-1AF 


Operation end time (OHHMMSSF ; F = sign) 




432-447 


1B0-1BF 


16 bytes user information 




448-455 


1C0-1C7 


Job name 

Job name associated with this particular POWER/ VS 

or DOS/VS job. If no job name is provided by the 

user the default value AUTONAME is set into this 

field. 




456-457 


1C8-1C9 


Job number 

Contains a binary job number assigned to the job 
upon its entry into the system and thereafter 
available for further identification of jobs with a 
common job name. 




458 


1CA 


Queue record identifier 
R = read queue record 
L = list queue record 
P = punch queue record 
F = free queue record 
D = dummy queue record. 




459 


1CB 


POWER/ VS cancel codes 
Cancel Code Condition 








X'10' Normal end of POWER/ VS Job or task 

X'20' PCANCEL has been issued 

X'30' PSTOP has been issued 

X'40' PFLUSH has been issued 

X'50' PDELETE has been issued 

X'60' PFLUSH has been issued via 

RDREXIT 
X'70' Canceled due to I/O error 


® 


460 


ICC 


Line identifier/device type 




461-463 


1CD-1CF 


Channel and unit (line address) 





POYO/VS CONTROL BLOCKS (...CONTINUED) 
DISK MANAGEMENT BLOCK (DMB) (Continued) 



Bytes 


Description/function of field 


Dec 


Hex 


464 


1D0 


From-terminal identifier 


465 


1D1 


To-terminal identifier 


466 


1D2 


Class (default = A) 


467 


1D3 


Priority (default = 3) 

This single byte contains the priority value 
(numeric to 9), assigned by the user to this 
job operation. 


468-471 


1D4-1D7 


Record count 

Binary counter that represents the number of 
input or output data records associated with the 
read, list, or punch operation (data transfer and 
control operations). 


472-473 


1D8-1D9 ' 


Number of tracks for output storage 
Binary counter recording the number of tracks 
within the data file used to contain data input or 
output for this particular job operation. 


474 


IDA 


Job suffix number 

Binary job suffix number assigned to each successive 
operation (read, list, or puch) performed on behalf 
of the job. It may be used to identify output sets 
produced by jobs handling segmented output. 


475 


1DB 


Number of copies 

This single byte contains a binary value indicating the 
number of copies of printed or punched output that 
are to be produced when the output is processed by the 
writer tasks. It has no use within input-related 
queue records. 


476-479 


1DC-1DF 


Forms identifier 

Alphameric forms or card identifier of any special 
stationery or card stock to be used when creating the 
physical output from the job. A blank value indicates 
that no special requirement exists. The field has no use 
within input-related queue records. 


480-483 


1E0-1E3 


Number of additional records. 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
DISK MANAGEMENT BLOCK (D MB) (Continued) 



Bytes 


Description/ function of field 


Dec 


Hex 


484-485 


1E4-1E5 


Number of pages (number of skips to channel 1) 


486-487 


1E6-1E7 


Number of extra pages 


488-491 


1E8-1EB 


Line/card counter (data transfers only) 


492-495 


1EC-1EF 


Restart page counter (used when PRESTART command 
given) 


496 


1F0 


Copies remaining (used when PRESTART command 
given) 


497 


1F1 


Not used 


498 


1F2 


Disposition (default = D) 


499 


1F3 


Number of separators 

Binary value indicating the number of printed output 
separators to be produced. It has no use within input- 
related queue records. 


500-503 


1F4-1F7 


Number of records before segmentaiion (count driven 
segmentation) 


504-507 


1F8-1FB 


Records before message 

Binary value representing the maximum number of list 
or punch data records that is to be tolerated by this 
job. When the record count exceeds the maximum value 
a warning message is output to the system operator. 


508-511 


1FC-1FF 


Records before next message 

Additional number of list or punch data records that is 
to be tolerated by the job each time the record count 
exceeds the maximum value specified in the preceding 
field and the system operator elects to continue 
execution of the job. 


512-513 


200-201 


3540 Physical device addres (packed) 


514-519 


202-207 


Reserved 






The second portion (56 bytes) of the queue record 
contain control fie Ids (information relating to the status 
of the queue record and to its position within the 
POWER/VS queues). 


520 


208 


Execution switch 
x = job in execution 
b = job not in execution 


521 


209 


First in set switch 



POWER/VS CONTROL BLOCKS (...CONTINUED) 
DISK MANAGEMENT BLOCK (DMB) (Continued) 



Bytes 




Description/function of field 


Dec 


Hex 


522 


20A 


Segmentation type 

c = count driven segmentation 
p = program driven segmentation 
d = data driven segmentation 
b = no segmentation 


523-535 


20B-217 


Reserved 


536-543 


218-21F 


Next record in set (MBBCCHHR) 

M = index in module control block address 

table in CAT. 


544-551 


220-227 


Pointer to previous queue record 

(MBBCCHHR) 

M = index in module control block address table in 

CAT. The meaning of this pointer depends on the 

value of the contents in field QCFS. (dfspl. X'201*) 


552-559 


228-22F 


Pointer to next queue record (MBBCCHHR) 
M = index in module control block address table 
in CAT. The meaning of this pointer depends on the 
value of the contents in field QCFS. (displ. X'201') 


560-567 


230-237 


Seek address of first data block (MBBCCHHR) 
M= index in module control block address table in 
CAT. Seek address of the first read, list, or punch 
data block associated with the input or output 
described by this queue record. 


568-575 


238-23F 


Reserved 






Master class table area 






Defines the status of the POWER/VS queues. 


576-703 


240-2BF 


Reader class area (32 entries, that is, 1 dummy entry 
and 31 entries 0-4 and A-Z) 


704-831 


2C0-33F 


List class area (32 entries, that is, 6 dummy entries 
and 26 entries A-Z) 


832-959 


340-3BF 


Punch class area (32 entries, that is, 6 dummy entries 
and 26 entries A-Z) 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
DISK MANAGEMENT BLOCK (DMB) (Continued) 



Bytes 


Description/function of field 


Dec 


Hec 






Each entry is defined as a class list entry (DSECT=) 
and consists of the following two 2-byte fields : 
1st field : Relative record number of first queue 

record in queue set in this class chain. 
2nd field: Relative record number of last queue 

record in queue set in this class chain. 

The high-order bit in the last field indicates whether 
there is a queue entry in this class that can be 
dispatched. 



© This fullword contains a fixed-point binary value, representing the number of 
records per track characterising the DASD on which the file is located. 

(5) This fullword contains a fixed-point binary value, representing the number of 
tracks per cylinder characterising the DASD on which the file is located. 

(5) This code indicates that the corresponding queue entry was not affected by an 
abnormal POWER/VS termination. The DOS/VS Jobs associated with the queue 
entry, however, could have been canceled via DOS/VS. 



@ The PSTOP cancel code will not be stored in an account record if the EOJ 
option was specified with the PSTOP command. 



How to Locate : Displ. X'4C-4F' of CAT contains pointer to the DMB. 



POWER/VS CONTROL BLOCKS (...CONTINUED) 
TASK CONTROL BLOCK (TCB) 
Definition macro : IPWSDTC 



The TCB is divided into the following main areas : 

o Task management fields 

o Task register save area (TRSA) 

o File control words and general task work area 

o Linkage register save area (LRSA) 



)®<D 



Q) The LRSA may be the first part of a double linkage register save area 

(DLRSA). 

(5) When the TCB belongs to a command processor task, the file control 

words, general task work area, and linkage register save area are replaced 
by a command processor control block. 

© When the TCB belongs to an RJE line manager task, the file control words, 

general task work area, and linkage register save area are replaced by 
information for the line manager. 



POWER/ VS CONTROL BLOCKS (. . . CONTINUED) 



TCB - TASK MANAGEMENT FIELDS 



Bytes in TCB 


Description/function of Task management fields 


Dec 


Hex 






The first 16 bytes contain the storage descriptor 


00-03 
04-07 


00-03 
04-07 


Storage descriptor block ID (TCB) 
Task ID 

X'D6" (C) TCB belongs to a command processor 
task. Remaining 3 bytes are 'jiCP' 

X'C9' (1) TCB belongs to an initiator. 
Remaining 3 bytes are 'JsIT'. 

X'E3' (T) TCB belongs to a terminator task. 
Remaining 3 bytes are '#TT'. 

X'D9' (R) TCB belongs to a local reader. 

X'E6' (W) TCB belongs to a local writer. 

X'C5' (E) TCB belongs to an execution 
processor task. 

In this case the next byte contains 
X'40', and the remaining bytes in 
the field indicate the partition that 
requested the task. For example, 
X'C6Fr= foreground 1 partition. 

X'Fl'-'F ' TCB belongs to an RJE task. 

In this case the three remaining bytes 
will indicate the type of task. For 
example, X'D9C4D9' =RDR. 

X'D3' (L) TCB belongs to a line manager task. 
Remaining 3 bytes are 'RLM'. 

X'D7' (P) TCB belongs to a status task. 
Remaining 3 bytes are '^PS'. 

X'40' (b) TCB belongs to an account task. 
Remaining 3 bytes are 'ACT 1 . 


08-11 


08-OB 


Physical device ID 

Physical unit address. If byte of the task ID field = 
X'Fl' - X'F9' (1-9), then it contains the RJE line 
number. 


12-15 


0C-0F 


Terminal ID 

Identifies the terminal ID requiring the task. When 
binary zeros (0000), then task started as result of 
command invoked by the central operator. 



POWER/VS CONTROL BLOCKS (. ■ .CONTINUED) 
TCB - TASK MANAGEMENT FIELDS ( Continued) 



Bytes in TCB 


Description/function of Task management fields 


Dec 


Hex 






The following two fields form part of the task selection 
list (TSL). 


16-1? 


10-13 


Address of task control block belonging to previous 
task in task selection list. 


20-23 


14-17 


Address of task control block belonging to the next task 
in task selection list. If the present is the last task 
control block in the chain, the address is that of the 
wait control block. 


24-27 


18-1B 


Page fault request word. Contains page fault request 
information resulting from a page fault interrupt. 
Contents of GPR 13, passed from DOS/VS supervisor 
and saved for page management in the event of a 
page fault occurring during execution of the task. 
The field is set to binary zeros when no page fault 
request condition is present; hence, it will contain 
binary zeros during the time that the task is in control 
of the central processor. 


28-31 


1C-1F 


Task selection field. 

Byte (the first byte in the field ) = Task State Value 

Task State Values 

At any time, each task within the POWER/VS must be in 
one or another of a set of task states. The state of each 
task is defined by the single alphameric character in 
byte 28 of the associated task control block, and this in 
turn determines what action the task management 
routines must take when the task is examined for dispatch. 

Task states are normally set by the task itself whenever 
one of the task management macros is issued. The task 
management routines and the command processing task 
are privileged, however, in that they may modify the 
task state of tasks other than themselves. 

Note : Task states can also be set by the page fault 
appendage routine. 



POWER, VS CONTROL BLOCKS (. . . CONTINUED) 
TCB - TASK MANAGEMENT FIELDS ( Continued) 



Bytes in TCB 


Description/function of Task management fields 






Dec 


Hex 








Task states 


Hex 


Char 


Task condition 




C9 


1 


Task is inactive 






Not 


D7 


P 


Page fault in process 






dispatchable 


D6 


O 


Waiting for operator 
response 




D3 


L 


Waiting for locked 












resource 








C6 


F 


Waiting for the LTA 
orPTA 






Conditionally 


D4 


M 


Wait on multiple CCB 






dispatchable 






or ECB posting ® 








D8 


Q 


As for M state, except 
event may never occur 








C3 


C 


Wait on single CCB or 
ECB posting (f) 








E2 


S 


As for C state, except 
event may never occur 


Immediately 


C4 


D 


Dispatch task 






dispatchable 






immediately 


Running 


D9 


R 


Task is running 


2) or for an RJE task, waiting for a single ECB 






posting. 






(2) or for an RJE task, waiting for a multiple ECB 






posting. 


Bytes 1-3 = Address of the routine in the nucleus 






that tests for the condition indicated 






by the task state. 


32-48 


20-30 


Task class list ( plus a 1-byte field of X'FF') 
Up to four different classes can be specified 
simultaneously for any task, except RDR. For each 
class identifying character an entry is made in this 
field. The first byte of each entry contains the class, 
and the remaining three bytes contain an address of 
an ECB in the master class table area (in DMB). 



PQWER/VS CONTROL BLOCKS (...CONTINUED) 
TCB - TASK MANAGEMENT FIELDS (Continued) 



Bytes in TCB 



Description/function of Task management fields 



Termination type 


Hex 


Char 




40 


(b) 


Normal - continue execution 


E4 


(O) 


Unrecoverable I/O error 


E7 


(X) 


Task cancel condition 


C3 


(C) 


PCANCEL command issued 


C6 


(F) 


PFLUSH command issued 


C5 


(E) 


Stop at end of Job 


E2 


(S) 


Stop immediately 


C8 


(H) 


PFLUSH with hold issued 


D9 


(R) 


Stop immediately and restart 


Job boundary 


switch 



FF = Start of job 

00 = Job boundary 

80 = No job started yet 

Function track indicator 

This indicator is used by the task terminator phase (TR) 
to determine the appropriate action in case of an I/O 
error on the queue file or the data file. The 
following entries are possible : 






X'D5* 
X'C9' 
X'C7' 
X'C4' 
X'C3' 
X'C6' 
X'C5' 

X'D3' 
X"00' 



N - Get next from queue 

I - Open for input 

G - Get in process 

D - Delete in process 

C - Free pending 

F - Free in process 

E - End of queue action, c 

accounting action 

L - Put account record in | 

- No entry active 

b - No entry active 



POWER/ VS CONTROL BLOCKS (. . .CONTINUED) 
TCB - TASK MANAGEMENT FIELDS ( Continued) 



Bytes in TCB 


Description/ function of Task management fields 


Dec 


Hex 


52-55 


34-37 


Function track indicator (continued) 

On output : 

X'D9" R - Reserve queue in process 

X'D6' O - Open for output 

X'D7' P - Put in process 

X'OT A- Add to queue 

X'05' E - End of queue action, awaiting 

accounting action 
X'D3' L - Put account record in process 
X'OO' - No entry active 
or 
X'40' b - No entry active 

Task event control block 






Each POWER/VS task that needs to perform input 
or output operations addressed to the system console 
must specify the operation required in the form of a 
message request word or a reply request word. 
These control fields are used to pass the necessary 
parameters for the operation of the message service 
routines. 


56-59 
60-63 


38-3B 
3C-3F 


Message request word. 

Byte : Hold flag and R5 flag. 
Byte 1-3 : Message address. 

The message address field contains the virtual address 
of the message control byte, that is, the byte that 
immediately precedes the test of the message to be 
output. 

Reply request word 

Byte 0: Binary 0. 

Byte 1-3 : Reply address. 

The reply address field contains the virtual address of 
the reply control byte, that is, the byte that 
immediately precedes the input area into which the 
reply is to be read. 

If no reply is to be made to the message, this 
field must contain binary zeros. 



POWER/VS CONTROL BLOCKS (...CONTINUED) 
TCB - TASK REGISTER SAVE AREA (TRSA) 



Bytes in TCB 



Description/ function of Fields in TRSA 



Register 12 - asynchronous address register 
('task PSW) 

Register 12 contains the address of the first instruction 
to be executed when the task is despatched. The first 
byte contains the condition code and the program mask 
bits in the form in which they are loaded by BAL 
instructions. (This is also true when the information is 
provided by the page fault appendage routines.) 

Register 13 - save area register 

Register 13 may contain the address of either the first 
(or only) or second linkage register save area depending 
on the hierarchy level of the caller. 

Register 14 - linkage register 

Register 14 is used to contain the linkage address, that 
is, the address to which return is to be made when an 
exit linkage is next performed. When not required for 
this purpose the register is available for general use. 

Register 15 - entry point register 

Register 15 is used to address the entry point of the 
routine to be entered when an entry linkage is 
performed. This address is normally that of the storage 
descriptor which precedes the routine to be executed. 
The register may be conveniently used as the base 
register for the function to be executed. When not 
required for this purpose the register is available for 
general use. 

Register 1 - parameter and work register 

Register 1 may address a control block or control block 
list on which the task is at present waiting. For a task 
in C or S state it will point to a conventional DOS/ VS 
CCB or a POWER/VS ECB. For a task in M or Q state, 
it will point to an ACB or CCB list. 



POWER/VS CONTROL BLOCKS (...CONTINUED) 
TCB - TASK REGISTER SAVE AREA (TRSA) (Continued) 



Bytes In TCB 


Description/functiorr/of Fields in TRSA 


Dec 


Hex 


88-91 


58-5B 


Register 2 - linkage and work register 

Register 2 is used by service routines to retain the 
return address of the requesting task. It also has 
machine usage when a translate and test instruction 
is executed. When not required for these purposes 
the register is available for general task use. 


92-95 


5B-5F 


Register 3 - resource address register 

Register 3 may contain the address of a resource 
control block on which the task is at present waiting 
(task in L state). When not required for this purpose 
the register is available for general task use. 


96-99 


60-63 


Register 4 - work register 


100-103 


64-67 


Register 5 - work register 

If the task owns queue space, this register will address 
the queue record. 


104-107 


68-6B 


Work register (may address the DMB). 


108-111 


6C-6F 


Work register 

In an execution processor task this register addresses 
the userCCB. 


112-115 


70-73 


Work register 

In an execution processor task this register addresses 
current channel command. In a physical routine, it 
points to PWS. 


116-119 


7A-77 


Base register for highest level of code used by task. 


120-123 


78-7B 


Restart information 

This field contains an action type code in byte and 
a value in bytes 1-3, as follows : 

Byte : 

X'04' restart at specified record (card or page) 
X'08 1 skip forward specified number of records 
X'OC skip back specified number of records 

(* set by PRESTART command) 



POWER/VS CONTROL BLOCKS (...CONTINUED) 
TCB - TASK REGISTER SAVE AREA (TRSA) (Continued) 



Bytes in TCB 


Description/ function of Fields in TRSA 


Dec 


Hex 






Restcrt information (continued) 






Byte (continued): 






X'10 1 print specified number of pages (set by 

P SET UP command) 
X'14' restart a specified record (card or page) 

(set by PSTOP with RESTART option) 






Bytes 1-3 : 






The number of records (cards or pages) to be acted 
upon. 


124 


7C 


Device type code 


125 


7D 


Account track indicator 

This indicator is used by the task terminator phase 
(TR) to determine the appropriate action in case of 
an I/O error on the account file. 

It can contain the following : 

X'D6' O - Open for reading account file 

X'CT A- Caller active 

X'C7' G - Get in process 

X'C3" C - Close in process 

X'D2' K - Keep account file in process 

X'C5' E - Erase account file in process 

X'OO' - No entry active 

or 

X'40 1 # - No entry active 


126-127 


7E-7F 


Packed device address 



POWER/VS CONTROL BLOCKS (■ . .CONTINUED) 

TCB - FILE CONTROL WORDS AND GENERAL TASK WORK AREA 



When the TCB belongs to a command processor task, this part of the TCB is 
replaced by the command processor control block (CPB). 



Bytes in TCB 


Description/ function of File Control Words and 
General Task Work Area 


Dec 


Hex 






I/O (disk or tape) request word for data file 


128-135 

136-139 
140-143 


80-87 

88-8B 
8C-8F 


Data file seek address (MBBCCHHR) 

M = index into the module control load address 

table. 

For tape spooling, this 8 byte field is defined 
as follows : 

byte Tapefla (X'80 1 ) 

byte 1 Reserved 

bytes 2-3 Length field 

bytes 4-7 Address of tape control block 

Real data area address ( see Note 3) 

Virtual data area address 






Blocking Control Words 


144-147 
148-151 


90-93 
95-97 


Residual count block 
Previous record address 






Record Control Word (formed from CCW) 


152 

153-155 

156 

157 
158-159 


98 

99-93 

9C 

9D 
9E-9F 


Record command code 
Record address (virtual) 

General purpo se byte 

X'00' = normal record 
X'02' = 3540 data record 
X'04' = end of data 
X'08' = break record 
X'10"= end of block 
X'20' = end of 3540 data 

(note : bit 7 of this byte may be set to 1 to indicate 
data transfer or card motion is to be performed 

Reserved 

Record length 



POWER/VS CONTROL BLOCKS (...CONTINUED) 



TCB - FILE CONTROL WORDS AND GENERAL TASK WORK AREA (Continued) 



Bytes In TCB 


Description/function of File Control Words and 
General Task Work Area 


Dec 


Hex 






l/0(disk or tape) request word for queue file 


160-167 


A0-A7 


Queue file seek address 

For tape spooling, this 8 byte field is defined as 
follows : 

byte : Tape flag 

byte 1 : Reserved 

bytes 2-3 : Length field 

bytes 4-7 : Address of tape control block 


168-171 


A8-AB 


Real queue space address (see Note 1) 


172-175 


AC-AF 


Virtual queue space address 


176-'91 


BO-BF 


General Task Work area, may be broken into fields 
in whatever way is required by a task (for example, 
logical reader and writer work areas) 

It can also contain the 3540 communication byte : 

X'01 ' = card reader with a 3540 attached 

X'02' = reading from 3540 

X'04' = 3540 data file processing. 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 

TCB - LINKAGE REGISTER SAVE AREAS (LRSA) 

When the TCB belongs to a command processor task, this part of the TCB is replaced 
by a command processor control block (CPB). 



Bytes in TCB 


Description/function of Fields in LRSA 


Dec 


Hex 






Register Save Area 


192-195 


C0-C3 


Task control block address 


196-199 


C4-C7 


Previous save area address points to second of double 
LRSA 


200-203 


C8-B8 


Saved Register 14 


204-207 


CC-CF 


Saved Register 15 


208-211 


D0-D3 


Saved Register 


212-215 


D4-D7 


Saved Register 1 


216-219 


D8-DB 


Saved Register 2 


220-223 


DC-DF 


Saved Register 3 


224-227 


E0-E3 


Saved Register 4 


228-231 


E4-E7 


Saved Register 5 


232-235 


E8-EB 


Saved Register 6 


236-239 


EC-EF 


Saved Register 7 


240-243 


F0-F3 


Saved Register 8 


244-247 


F4-F7 


Saved Register 9 



The high-order byte of this field will contain the command code of 
the current or last executed operation. 



How to locate TCB : Chaining of TCB's via 'previous' and 'next' pointers, task 
selection list is delimited by the WCB. 



POWER/VS CONTROL BLOCKS (...CONTINUED) 



COMMAND PROCESSOR CONTROL BLOCK (CPB) 



This block replaces part of a command processor TCB, when a command is 
entered via the console keyboard by the central operator, and of its associated 
temporary command processor TCB when linkage is made via the IPWSICP macro. 

CPB replaces file control fields, general task work area, and LRSA of standard 
TCB. 

The contents of the CPB are described below : 



Bytes 




Description/ function of field 


Dec 


He* 


00-15 


00-0F 


Storage descriptor (CPB) 


16 


10 


RJF-userid (Ofor local) 


17-23 


11-17 


Command Code 


24-95 


18-5F 


Operands (free format) 


96-103 


60-67 


Sequence number (RJE only) 


104-107 


68-6B 


Address of caller ECB 


108-119 


6C-77 


Reserved 



How lo Locate : Displacements X'80' of the appropriate command processor TCB 
is the starting address of the CPB. 



POWER/VS CONTROL BLOCKS (. . . CONTINUED) 
PHYSICAL WORK SPACE (PWS) 



Definition macro : IPW$DPW. 



Bytes 


Description/function of field 


Dec 


Hex 


00-03 


00-03 


Virtual address of the first PDA 




04-07 


04-07 


Real address of the first PDA 




08-11 


08-0B 


Virtual address of the second PDA 




12-15 


0C-0F 


Real address of the second PDA 




16-19 


10-13 


Virtual address of the active PDA 




20-23 


14-17 


Real address of the active PDA 




24-25 


18-19 


Displacement of last CCW in string from beginr 
of PDA 


ing 


26-27 


1A-1B 


Physical record length: to update the record 
pointer in the deblock routine 




28-31 
28 

29 
30-31 


1C-1F 
1C 

ID 
1E-1F 


Device type information 
1 byte = single/double buffering (contains 
number of buffers) 

1 byte= device type of unit record device 

2 bytes = LUB number 




32-35 


20-23 


Virtual address of end of PDA 




36-39 


24-27 


Real address of end of PDA 




40-43 


28-2C 


Real address of the first CCW 




44-55 


2D-37 


Reserved. 





How to locate : Reg. 8 in the TCB for a task that uses a physical routine. 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
LOGICAL DATA RECORD AREA (LDA) 



The format of a data record is shown below : 
12 3 4 

IrlIrlI gp| eel TEXT 



- Command code 
(for output U.R. device) 



- General purpose byte 
X'00' = normal record 
X'02 1 = 3540 data record 
X'04' = end of data 
X'08 1 = break record 
X'10' = end of block 
X'20 1 = end of 3540 data 
(Note : bit 7 of this byte may be set to 
to indicate data transfer or card motion 
is to be performed) 

Record length 



How to Locate : Displ. X'88-8B' (I/O request words) of a TCB for R/W or XPtask 
contains a pointer to the LDA. 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 



MODULE CONTROL BLOCK (MCB) 



Definition macro : IPW$DMC 



Description of Contents 




Bytes 






Dec 


Hex 




00-15 


00-0F 


Storage descriptor MCB QFILE1 cuu (SYS001) 
Storage descriptor MCB DFILE2 cuu (SYS002) 
Storage descriptor MCB DFILE3 cuu (SYS003) 
Storage descriptor MCB DFILE4 cuu (SYS004) 
Storage descriptor MCB DFILES cuu (SYS005) 
Storage descriptor MCB DFILE6 cuu (SYS006) 
Storage descriptor MCB LFILE7 cuu (SSL) 
Storage descriptor MCB LFILE8 cuu (PVTSSL) 


16-23 


10-17 


Module seek address (MBBCCHHR) Q 


24-27 


18-1B 


Reserved 


28-31 


1C-1F 


Lock word 






Command control block 


32-33 


20-21 


Residual count 


34-35 


22-23 


Communication bytes 


36-37 


24-25 


Device status 


38-39 


26-27 


EXP real plus LUB index 


40-43 


28-2B 


CCW address 


44-47 


2C-2F 


CCW address in CSW 






Extent information 


48-51 


30-33 


Low limit (CCHH) 


52-55 


34-37 


High limit (CCHH) 


56 


38 


Sector value 


57-59 


39-3B 


Reserved 


60-63 


3C-3F 


Sector table address 






Channel program 


64-71 


40-47 


Seek CCW 


72-79 


48-4F 


Set sector or TIC CCW 


80-87 


50-57 


Search CCW 


88-95 


58-5F 


TIC CCW 


96-103 


60-67 


Read or write CCW 


104-119 


68-77 


Reserved 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 

MODULE CONTROL BLOCK (MCB) ( Continued) 

(j) Seek and search address required by the channel program. Whenever 

an input or output operation is to be performed it is updated from the 
seek address pointer in the I/O Request Word that controls the 
operation. 



How to Locate : 








Displ. X'60-63' 


of CAT contain 


s pointer to MCB Q files 


" X'64-67' 






" Dfile 1 


" X'68-6B' 


i. 




" Dfile 2 


" X'6C-6F' 






" Dfile 3 


" X'70-73' 


,i 




" Dfile 4 


" X'74-77' 






" Dfile 5 


" X^-TB' 


" " 




1 " private SSL 


" X7C-7F' 






" system SSL 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
TAPE CONTROL BLOCK (TBB) 
Definition macro : IPWSDTB 
Description of Contents 



Bytes 


Description/function of field 


Dec 


Hex 


00-15 
16-27 
28-31 


00-OF 
10-1B 
1C-1F 


Storage descriptor (TBB) 

Reserved 

Lockword 






Command control block 


32-33 
34-35 
36-37 
38-39 
40-43 
44-47 


20-21 
22-23 
24-25 
26-27 
28-2B 
2C-2F 


Residual count 
Communication bytes 
Channel and device status 
EXCP real plus LUB index 
CCW address 
CCW address in CSW 


48-55 


30-37 


Write CCW 



How to Locate: Displ. X'84-87' and X'A4-A7' of TCB (when initialised for tape- 
spooling) contain pointers to TBB. 



POWER/VS CONTROL BLOCKS (■ . .CONTINUED) 
PAGE CONTROL BLOCK (PCB) 
Definition macro : IPWSDPC 



Bytes 


Description/function of field 


Dec 


Hex 


00-03 


00-03 


Page real storage address 

Real storage address of the page described by this 

PCB. 


04-07 


04-07 


Previous page virtual address 

Virtual storage address of the previous page in the 
fixed page list. If the present page is the first page 
in the fixed page list the word is set to binary zeros. 


08-11 


08-OB 


This page virtual address 

This fullword contains the virtual storage address of 

the page described by this page control block. 


12-15 


0C-0F 


Page control byte address 

Contains the virtual storage address of the byte within 
the storage assignment block in the storage control 
block which corresponds to the present page. 


16-19 


10-13 


First buffer address 

This fullword contains the virtual storage address of the 

first storage buffer within the present page. 


20-23 


14-17 


Next page virtual address 

This fullword contains the virtual storage address of 

the next page in the fixed page list. If the present 

page is the last page in the fixed page list the word 

is set to binary zeros. | 



How to locate -.Each page in the fixable area starts with this control block, which 
occupies the first 24 bytes of the page. 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
BUFFER CONTROL WORD (BCW) 



Byfes 


Description/function of the field 


Dec 


Hex 


00-01 
02-03 

04-07 


00-01 
02-03 

04-07 


Length of previous buffer 

This halfword contains the binary length of the 
immediately-preceding storage buffer. If the buffer 
is in use its length is stored in twos complement 
form. If the buffer is not in use its length is stored 
in normal form. If the present buffer is the first in the 
page the word is set to binary zeros. 

Length of next buffer 

This halfword contains the binary length of the 
present storage buffer, that is, the buffer which 
immediately follows this buffer control word in 
storage. If the buffer is in use its length is stored 
in twos complement form. If the buffer is not in use 
its length is stored in normal form. If the preceding 
buffer is the last in the page the word is set to 
binary zeros. 

Owner (TCB virtual address) of next buffer. This 
fullword contains the address of the TCB belonging 
to the task which issued the request for buffer space. 
If a TCB is contained in the buffer, the owner address 
is that of the task which built the TCB. 



When a page is fixed in the fixable area, storage management 
assigns the first and last buffer control words. The first buffer control 
word is placed immediately after the page control block at the start 
of the page in real storage, and the last buffer control word is placed 
in the last two words of the page. 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
PARTITION CONTROL BLOCK (PDB) 

Definition macro : 1PWSDPD 



Bytes 




Description/function of fields 






Dec 


Hec 




00-15 


00-0F 


Storage descriptor PART .CONTR. BLOCK 


16-17 


10-11 


Reserved 


18-19 


12-13 


Partition identifier 


20-23 


14-17 


Number of entries 


24-27 


18-1B 


Partition comreg address 


28-31 


1C-1F 


PIB address 


32-35 


20-23 


First entry address 


36-39 


24-27 


Boundary Box entry pointer 


40-47 


28-2F 


Reserved 






Statistical information 






This information is destined for the execution 






account record and there is a pointer to the SL1 






work area 


48-51 


30-33 


Pointer to SLI work area 


52-55 


34-37 


Number of lines spooled 


56-59 


38-3B 


Number of cards spooled 


60-61 


3C-3D 


Number of pages spooled 


62-63 


3E-3F 


Reserved 






3540 Spool device entry 


64-79 


40-4F 


Format same as for RDR device entry 






RDR device entry (maximum = 1) 


80-83 


50-53 


Address of entry in the DOS/VS PUB for a card 
reader device 


84-87 


54-57 


Address of execution reader TCB 


88-91 


58-5B 


CCB address. The first byte of this field is the SVC 
code : 

X'OO' = SVC : I/O request by user program 
X'90' = SVC90 : accounting request by PA 
X'91 ' = SVC91 : accounting request by JCL 


92 


5C 


Device type code 


93 


5D 


Device class code 

Can be R = normal reader, or C = console 


94-95 


5E-5F 


Requestor ID 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
PARTITION CONTROL BLOCK (PDB) (Continued) 



Bytes 


Description/ function of fields 


Dec 


Hex 






LST device entry (maximum = 8) 


96-99 

100-103 
104-107 
108 
109 

110-111 


60-63 

64-67 
68-6B 
6C 
6D 

6E-6F 


Address of entry in the DOS/VS PUB for a printer 

device 

Address of the execution list TCB N 

CCB address 

Device type code 

For list device entry this can be L = device 

is being spooled, N = device is not being spooled. 

Requestor ID 


Depends on number of 
LST entries 


PUN device entry (maximum = 8) 
(same format as LST device entry) 






Address of entry in the DOS/VS PUB for a punch 

device 

Address of the execution punch TCB 

CCB address 

Device type code 

For punch device entry this can be P = device is 

being spooled, N = device is not being spooled. 

Requestor ID 



Displ. X'AO - A3' of the partition comreg and R6 in TRSA 
of a TCB. 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
QUEUE RECORD AREA (QRA) 
Definition macro : 1PWSDQR 



Bytes 




Description/function of field 






Dec 


Hex 








Body Fields (first 96 bytes) 






The body of the queue record contains information 






pertinent to this particular queue entry and the 






user fob which created it. 


00-07 


00-07 


Date 


08-11 


08-08 


Operation start time 


12-15 


0C-0F 


Operation end time 


16-31 


10-1F 


User information 


32-39 


20-27 


Job name 


40-41 


28-29 


Job number 


42 


2A 


Queue record identifier 


43 


2B 


POWER/VS cancel code 


44 


2C 


Line identifier or device type 


45-47 


20-2F 


Channel and unit (line address) 


48 


30 


From terminal identifier 


49 


31 


To terminal identifier 


50 


32 


Class 


51 


33 


Priority 


52-55 


34-37 


Record count 


56-57 


38-39 


Number of tracks 


58 


3A 


Job suffix number 


59 


3B 


Number of copies 


60-63 


3C-3F 


Forms identifier 


64-67 


40-43 


Number of additional records 


68-69 


44-45 


Number of pages 


70-71 


46-47 


Number of extra pages 


72-75 


48-4B 


Line/ card counter 


76-79 


4C-4F 


Restart page count 


80 


50 


Copies remaining 


81 


51 


Not used 


82 


52 


Disposition 


83 


53 


Number of separators 


84-87 


54-57 


Number of records before split 


88-91 


58-5B 


Maximum value of count- 


92-95 


5C-5F 


Additional count value 


96-97 


60-61 


3540 Physical unit address in packed format 


98-103 


62-67 


Reserved 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
QUEUE RECORD AREA (QRA) (Continued) 



Bytes 




Description/function of field 






Dec 


Hex 








Control Fields (56 bytes) 






The control portion of the queue record contains 






information relating to the status of the queue record 






and to its position within the POWER/VS queues. 


104 


68 


Execution switch 


105 


69 


First in set switch 


106 


6A 


Segmentation type 


107-119 


6B-77 


Reserved 


120-127 


78-7F 


Next record in set 


128-135 


80-87 


Previous set in queue 


136- 143 


88-8F 


Next set in queue 


144-151 


90-97 


First block of data 



How to locate : Displ. X'A8-AB' of a TCB (not J>eing Comm. proc. or Line manager 
TCB). 



POWER/VS CONTROL BLOCKS (...CONTINUED 

SLI WORK SPACE (SLW) 
Definition macro : IPWSDSL 



Byres 


Description/function of field 


Dec 


Hex 


00-79 


00-49 


Logical record work area 


80-239 


50-E9 


SSL block work area 






Disk request word 


240-247 

248-251 
252-255 


F0-F7 

F8-FB 
FC-FF 


Seek address (MBBCCHHR) M= index in module 
control block address table in CAT. 
Real address read-in area 
Virtual address read-in area 


256-259 


100-103 


Register 8 save area 






SLI sublibrary and bookname 


260 
261-268 


104 
105-10C 


Sublibrary name 
Bookname 


269 
270 


10D 
10E 


Read SSL switch 
Read RDR switch 


271-279 


10F-117 


Filler for alignment 



Displ. X'SO'-X'SS' of P 



POWER/VS CONTROL BLOCKS (.. .CONTINUED) 



ACCOUNT CONTROL BLOCK (ACT) 
Definition macro : IPW$DAC 



Bytes 


Description/function of field 


Dec 


Hex 


00-15 


00 -OF 


Storage descriptor (ACB) 


16-19 


10-13 


Event control block 

This ECB is posted when the account file is 

emptied 


20-23 


14-17 


Extent lower limit 


24-27 


18-1B 


Extent upper limit 


28-31 


1C-1F 


Lockword 






Command Control Block 


32-33 

34-35 

36-37 

38-39 

40 

41-43 

44 

45-47 


20-21 

22-23 

24-25 

26-27 

28 

29-2B 

2C 

2D-2F 


Residual count 
Communication bytes 
Device status 
Logical unit 
Reserved for LIOCS 
CCW real address 
Reserved for PIOCS 
CCW address in CSW 


48-54 
55 


30-36 
37 


Current seek address (BBCCHHR) 
Reserved 


56-63 


38-3F 


Count field 


64-67 


40-43 


Maximum account file capacity 


68-71 


44-47 


20% limit residual capacity 


72-75 


48-4B 


Current residual capacity 


76-79 


4C-4F 


Maximum track capacity 


80-83 


50-53 


Residual capacity on current track 


84-87 


54-57 


Number of tracks per cylinder 


88-89 


58-59 


Sector values 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
ACCOUNT CONTROL BLOCK (ACB) (. . .CONTINUED) 



Bytes 


Description/function of field 


Dec 


Hex 


90-91 


5A-5B 


Tolerance 


92-93 


5C-5D 


Overhead 


94 


5E 


PUB device type code 


95 


5F 


DTFPH device type code 






Channel Program 


96-103 
104-111 
112-119 
120-127 
128-143 
144-151 


60-67 
68-6F 
70-77 
78-7F 
80-8F 
90-97 


Seek CCW 

Set sector or TIC * +8 CCW 

Search ID equal CCW 

TIC * -8 CCW 

WCKD CCWs (WCOUNT and WDATA) 

Read sector CCW or not used 


152-167 

168-171 
172-183 


98-A7 

A8-AB 
AC-B7 


Channel program modifiers RDATA and 
RCOUNT CCWs 

Virtual address account work space buffer 
Not used 



How to Locate: 



Displ. X'50' -X'53' of CAT. 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
LINE CONTROL BLOCK (LCB) 



Definition macro : IPW$DLC 



Bytes 




Description/function of field 






Dec 


Hex 




00-07 


00-07 


LCB header (LCBbbcuu) 


08-15 


08-0F 


System data in format specified at SYSGEN 


16-19 


10-13 


SIGNON time in format 0HHMMSSF; 
F = sign in packed decimal 


20-23 


14-17 


SIGNOFF time in format 0HHMMSSF; 
F = sign in packed decimal 


24-39 


18-27 


User information 


40-47 


28-2F 


Line password 


48-49 


30-31 


Reserved 


50 


32 


Line account record identifier (T) 


51 


33 


SIGNOFF code 


52 


34 


Terminal error count. This count is only 
maintained for intervention required and for 
specific timeouts. When the count reaches 
10 a record is written to SYSREC (error 
recorder file). Then the count is reset to zero. 
When it reaches 10 again, the same sequence 
occurs. 


53-55 


35-37 


Line address (in alpha) 


56 


38 


Remote identifier (in binary) 


57 


39 


Remote identifier (for compatibility) 


58-59 


3A-3B 


Transmission count per session 


60-61 


3C-3D 


Timeout count per session 


62-63 


3E-3F 


Error count per session 


64-67 


40-43 


Corresponding BCA address 


68-71 


44-47 


LCB chain pointer. A chain of LCBs is maintained 
and is continuously scanned by the line manager. 
Up to 25 LCBs can be chained, the last LCB in the 
chain has in this field. 


72-75 


48-4B 


Work field 


76-79 


4C-4F 


Remote identifier. 

This 4-byte field consists of remote ID in binary 
in first byte and remote ID in alpha in bytes 2, 3 
and 4. 


80-83 


50-53 


List output classes. Each byte in this 4-byte field 
contains a hex displacement in the LST part of the 
MCTA in the DMB. The displacement contained in 
one of the bytes therefore corresponds to a class. 

Up to four classes may be specified, being 
delimited by X'FF' in a similar manner to that in the 
TCCT field in the TCB. 



POWER/VS CONTROL BLOCKS (. . . CONTINUED) 
LINE CONTROL BLOCK (LCB) (..CONTINUED) 



Bytes 






Description/function of field 






Dec 


Hex 








For example, the command * .. START LST, 






B,C,D would result In the displacements 18, 






IC, 20 being placed in this field. (Byte 3 






would be X'FF'). If no START LST command 






is entered the first byte of this field is FF. 


84-87 


54-57 


Punch output classes. Each byte in this 4-byte 
field is used in the same way as in field 
LCBLIST, displacements being in the PUN 
part of the MCTA. 


88-89 


58-59 


Timeout counter. This field counts the number 
of timeouts (1 every 3 seconds) as long as the 
terminal is idle (no data transfer). When 
information is transmitted on the i. je it is set 
to zero. The count is compared witt the 
timeout limit specified in the PLINE macro. 


90-91 


5A-5B 


Timeout limit. The value in this field is 
specified by the TIMEOUT paramater in the 
PLINE macro. If the user specifies 1 (one minute) 
the value set in this field is binary 20. The 
maximum timeout that may be specified is 255 
minutes. If the idle time on the line as counted 
in the field LCBTMCNT exceeds the value of 
field LCBTMOUT the terminal is signed off by 
POWER/VS. If TIMEOUT=NO is specified, this 
field is filled with binary zeros. 


92 


5C 


Line features 


93 


5D 


LCB flags 

X'80' Line stop 

X'40 1 Line start/restart 

X'20' An ETX has been received 

X'10' No messages wanted 

X'08' Remote is signed on 

X'02' S1GNOFF card has been read 

X'01' signoff (processing finished) 


94 


5E 


Output switches 

X'80' = list output is ready and dispatchable 

for any of the classes started 
X'08' = punch output is ready and distpatchable 

for any of the classes started 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
LINE CONTROL BLOCK (LCB) (...CONTINUED) 



Bytes 




Description/function of field 






Dec 


Hex 








On START LST, field LCBOUT is initiated with 






X'80'. 






On START PUN, field LCBOUT is initiated with 






x-os 1 . 


95 


5F 


Message subchain index. This byte contains the 
entry number in the message queue that contains 
the first message queued for this LCB. 


96-99 


60-63 


Reader TCB address. This field contains the reader 
TCB address as long as the reader is active. It is 
set to binary zero when an RDR TCB is detached. 
If an EOF is encountered in the middle of a job, 
TCB space is not released, and the field is not 
set to zero. After the user responds by placing 
more cards in the reader the reader TCB will be 
reactivated. 

To summarize : 

If the field is zero, a new.TCB is created. If the 
field is nonzero, the original TCB is reactivated. 


100-103 


64-67 


List forms 


104-107 


68-6B 


Punch forms 


108-109 


6C-6D 


Corresponding PUB address 


110-111 


6E-6F 


Message counter. This field contains the number of 
messages for the user of this LCB in the remote 
message queue. 

Since this remote message queue contains 255 
entries an overflow condition may occur. Should 
an overflow occur , the LCB with the highest 
value in this field is located, all messages for this 
user are removed from the message queue and 
replaced by message 1R20I. 


112-119 


70-77 


Not used. 


Remote Block 


120 


78 


Default punch routing 


121 


79 


Default list routing 


122-123 


7A-7B 


Terminal buffer size 

Size of this buffer depends on type of terminal. 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
LINE CONTROL BLOCK (LCB) (. . . CONTINUED) 



Bytes 


Description/function of field 


Dec 


Hex 


124 


7C 


Terminal type plus line features 

X'80' Log every channel end £> 1 

X'40' Transparency £>2 

X70" ASCII code 

X'02' 3780 

X'Ol' 2780 or 3741 

X'00' 2770 or 3780 with component select 


125 


7D 


Terminal features 

X'20' Hardware compress feature 
X'10' Multiple-record feature 
X'08' Horizontal format control 
X'02' Variable length records 
X'Ol' Blocked records 


126 
127 


7E 
7? 


Remote printer width 
Reserved 



D>i. 



The byte is set X'80' if TRACE=YES has been specified in the REMOTE macro. 
It enables a wraparound I/O trace in the phase IPWSSTM. 



^2. Transparency enables user to transmit object decks over line. If no transparency 

is supported codes X'00' through X'40' are converted to binary zeros for output 
to the terminal. 

Transparency on input (read) is determined by a switch on the terminal unit. 

For print output to the terminal, non-transparency if forced by POWER/VS. 

For punch output, transparency depends on whether it has been specified in the 
PLINE macro and the PRMT macro. If either one has not been specified for 
transparency, non-transparency is forced by POWER/VS. 



POWER/VS CONTROL BLOCKS (.. .CONTINUED) 
BUFFER CONTROL AREA (BCA) (. . .CONTINUED) 



Bytes 


Description/function of field 


Dec 


Hex 


72-73 
74-75 
76 
77 

78-79 

80 

81 

82 
83 

84 
85 

86 
87 
88 
89 
90 
91 


48-49 
4A-4B 
4C 
4D 

4E-4F 

50 

51 

52 
53 

54 
55 

56 
57 
58 
59 
5A 
5B 


Multi leaving sign-on sequence 

Start of text sequence 

End of text block sequence 

End of text block character 

This 1-byte field is the second byte of the 

previous 2-byte field. 

End of text sequence 

Even acknowledgement sequence 

Even acknowledgement character 

This 1-byte field is the second byte of the 

previous 2-byte field. 

Odd acknowledgement sequence 

Odd acknowledgement character 

This 1-byte field is the second byte of the 

previous. 2-byte field 

Negative acknowledgement sequence 

Negative acknowledgement character 

This 1-byte field is the second byte of the 

previous 2-byte field. 

Acknowledgement conversation character 

CCW chaining character 

Enquiry character 

End of transmission character 

Wait before transmit 

Reserved for future use 






Other RJE Information 


92-95 
96 

97-99 
100 

101-103 
104-107 

108-111 
112-115 
116-119 

120-123 


5C-5F 
60 

61-63 
64 

65-67 
68-6B 

6C-6F 
70-73 
74-77 

78-7B 


Restart address of channel program 

Last remote output command code 

Address of the last remote carriage control 

Current remote output record count. Incremented at 

each PUT during a WRITE operation. The count is 

compared with the value in the field TPBMXREC. 

If they match, the PDA is written out. 

Remote data pointer. Address of the record in the 

PDA currently being processed. 

Address of last data byte read. Address of the last 

byte read into the PDA (not necessarily the last byte 

in the PDA). 

Address of the corresponding LCB 

Reserved 

Address of the last CCW executed plus 8 (stored 

by the RJE channel appendage routine on every 

I/O interrupt). 

Displacement between the real and virtual address 

of the BCA (used to construct real addresses for the 

channel program). 



POWER/VS CONTROL BLOCKS (...CONTINUED) 
BUFFER CONTROL AREA (BCA) (...CONTINUED) 



Bytes 




Description/function of field 


Dec 


Hex 


124-127 


7C-7F 


Address of next CCB completed. BCA chain pointer, 
set up by channel appendage routine, and 
processed by line manager. 


128-131 


80-83 


Address of a list TCP or punch TCB as long as an 
RJE LST or PUN task is active. Otherwise, the 
field is 0. (Has same function as field 
LCBTCBAD in the LCB. 


132-135 


84-87 


Real address of PDA. Address of current TP buffer. 
Updated whenever a new buffer is obtained. 


136-139 


88-8B 


Virtual address of PDA. Address of current TP 
buffer. Updated whenever a new buffer is obtained. 


140-143 


8C-8F 


Address of last TCB, as long as a form change is 
needed. Otherwise, the field is 0. 


144 


90 


Remote mode byte (SDA mode byte). Set at line 
initialization time to X'04 1 for 2701, and to 
X'OO' for 2703 TP control unit or ICA. 


145 


91 


Remote next acknowledgement . For write response 
CCW 


146-147 


92-93 


Remote response control block. Used for the write 
response to the terminal, and to read the response 
from the terminal 


148 


94 


First sense byte (see TP manual) 


149 


95 


Second sense byte (always 0) 


150 


96 


Maximum output record count. Contains a value 
equal to the maximum record count for the output 
buffer at the terminal. Its value depends on the 
terminal type. 


151 


97 


BCA flags 

X'01' end of transmission 

X'02' end of forms 

X'04' second entry to put routine. 



POWER/VS CONTROL BLOCKS (...CONTINUED) 



BUFFER CONTROL AREA (BCA) 



Deflation macro : IPW$DBC 



Bytes 


Description/function of field 


Dec 


Hex 






RJE CCB 

Initialized with a complete sense CCW to read 
sense information into the two sense bytes in the 
BCA. Byte 12 is initialized with bits 1 and 2 on 
indicating that channel-end appendages and 
private unit-check routines are being used. 


00-01 

02 

03 

04-05 

06-07 

08-11 

12 

13-15 

16-23 


00-01 

02 

03 

04-05 

06-07 

08-0B 

OC 

0D-0F 

10-17 


Residual count 
Communication byte 
Communication byte 
Status bytes from CSW 
Logical unit number 
First CCW address 

Communication byte 
Channel appendage address 
RJE sense CCW 




RJE CCW string, dynamically set up by MCCWINIT routine 


24-31 
32-39 
40-47 
48-55 
56-63 
64-71 


18-1F 
20-27 
28-2F 
30-37 
38-3F 
40-47 


These six CCW fields constitute various channel 
programs that depend on the operation required. 
For example, a READ program consists of 

• An enable CCW 

• A write response CCW 

• A read text CCW. 

A WRITE program has a different CCW string and 
a PREP program consisting of : 

• A disable CCW 

• A set mode CCW 

• An enable CCW 

• A write enquiry CCW 

• A read response CCW 






EBCDIC/ASCII Code Table 

This table is moved from virtual storage at OPEN 
time for RDR, LST, or PUN to reflect one of the 
following four conditions: 

EBCDIC code transparency 
EBCDIC code non-transparency 
ASCII code transparency 
ASCII code non -transparency 



OPEN 3540 DISKETTE WORK SPACE 



Bytes 




Description/function of field 






Dec 


Hex 




00-15 


00-0F 


Storage descriptor ('OEWS V6M0 cuu") 






3540 command control block 


16-17 


10-11 


Residual count 


18-19 


12-13 


Communications bytes 


20-21 


14-15 


Device status 


22-23 


16-17 


Device type and logical unit 


24 


18 


Reserved for LIOCS 


25-27 


19-1B 


First CCW 


28 


1C 


Reserved for PlOCS 


29-31 


1D-1F 


CCW address in CSW 


32-87 


20-57 


Temporary register save area for the interface 
between functions 


88-95 


58-5F 


Conversion work space 






3540 channel program 


96-103 


60-67 


Define operations or NOP 


104-111 


68-6F 


Seek 


112-119 


70-77 


Read label 


120-123 


78-7B 


Mode setting argument 


124-127 


7C-7F 


Seek argument (00CCHHRR) 


128-207 


80-CF 


3540 input area and label test area 






Message buffers and work areas 


208 


DO 


Message length of first line 
First line of message output area 


209-215 


D1-D7 


Message identity 


216-263 


D8-107 


Message text of first line 


264 


108 


Message length of second line 
Second line of message output area 


265 


109 


Message identity c 


266-319 


110-13F 


Message text of second line 


320 


140 


Not used 


321 


141 


Reply length 


322-327 


142-147 


Reply input area 


328-329 


148 


Cylinder number save area 






Physical reader information indicators. 






The following indicators are copied from the 






physical work space to prevent them from being 






destroyed should the open be unsuccessful. On a 






successful open, the indicators in the physical 






work space are overwritten by these updated 






indicators. On an unsuccessful open, only the 






open indicator 'PEOC will be updated with the 






stop code 'S'. 



OPEN 3540 DISKETTE WORK SPACE (. . .CONTINUED) 



Bytes 


Description/function of field 


Dec 


Hex 


330-331 

332 
333 
334 
335 


14A-14B 

14C 
14D 
14E 
14F 


Record length (copy of PERL) 

Sequence ID (copy of PESI) 

Multivolume identification (copy of PEMI) 

Volume sequence number (copy of PESN) 

Number of opened diskettes (copy of PEOD) 

Number of diskettes to be read (copy of PEND) 


336-343 


150-157 


Not used 



RJE I/O TRACE 



An I/O trace for an RJE line after SIGNON can be initiated by 
specifying YES to TRACE=in the PRMT macro. 

Entries are made in a wraparound buffer in the phase IPWSSTM. 
The following information is recorded at every l/O interrupt 
from this terminal. 



-32 bytes - 



Up to 127 
entries of 32 
bytes each. 
The last entry 
is followed by 
a blank line of 
32 bytes. Thus, 
the last few 
entries can 
easily be located 
in a dump of the 
buffer 



First 12 bytes Last CCW 
of CCB executed 



First four bytes in *t— 
data buffer (includes 
line control characters) 



The last line response 
■sent or received from 
the terminal 

>Sense information 



Last four bytes of data 
►buffer (includes TP control 
characters) 



\ 



A data buffer with four 
records (Number of records 
in a data buFfer depends 
on type of terminal). 



The trace is to be used when RJE line errors occur or incorrect output 
is encountered which can be caused by the I/O operation. 



POWER/VS FILE DUMP PROGRAM 

This program enables any of the POWER/VS files (account, queue, data) to be dumped 
on a line printer assigned to SYSLST. An option is also provided to enable queue 
records and their associated track groups belonging to specific jobs to be dumped. 

How to Execute 



The program is requested by JCL commands entered either via SYSLOG or SYSIN, 
where SYSIN is assigned to a card reader. Before requesting ensure relevant assignments 
are made for the file to be dumped. 



SERVICE AIDS (. . . Continued) 

POWER/VS FILE DUMP PROGRAM (. . .Continued) 

Example Job Stream 

//JOBname 

//ASSGN (SYS000 for Account file) 

(SYS001 for Queue file) 

(SYS002-6 for Data files) 
//EXEC IPW$$DD 

When the program is loaded successfully, the following message will be issued 
to SYS LOG: 

DUMP FUNCTION = 

At this point one of the following options can be entered via SYSLOG : 

A (to specify the Account file) 

Q (to specify the Queue file) (T) 

D (to specify the Data file) 

Jobname (jobnumber) (, queue) (2) 

EOJ (to enable cancelation of the program or selection of a new option). 

(7) The complete data file will be dumped. 

© This enables (a) queue record(s) belonging to a specific job in the RDR, 
LST, or PUN queue plus its associated track group(s) to be dumped. 
Job name may be 8 characters, job number may be 6 characters. For the 
'queue' option one of the following three entries can be specified : 



L, for LST queue (default) 
P, for PUN queue 
R, for RDR queue. 

After the dump is completed, the message 



DUMP FUNCTION = 

is issued to SYSLOG again to enable either a new option to be specified or the 
program to be terminated by the option EOJ. 

Format of Output 

For every 100 bytes, a block of four lines is printed. Line 1 contains the printable 
characters in those bytes; line 2 contains the zone-part of each byte; line 3 contains 
the numeric part of each byte; line 4 contains a scale indicating the position of the 
bytes in the string. 

line 1 : CHAR // job POWJOB01 DATE 08/19/74, 

line 2 : ZON 664DDC4DDEDDCFF444i4U44it444 4444CCEC4FF6FF6FF6 

line 3: NUMR 11016207661620100000000000 00004135008119174B 

Iine4- 01. ..5. ..10. ..15.. .20. ..25. . 85 . . .90 . . .95 
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User Exit 
















An 








PAB O 
*7 






















Pageable 
Storage 
















System 
Save Area 














RPH 






System 
CRA 




* Processing Sequence 


User 
Save Area 






User 
RPH 






Storage 
Request 
RPH 






Dynamic 
PAB 





PROCESS SCHEDULING CONTROL BLOCK RELATIONSHIP (....Cont'd) 



t next PAB 



! next Work_ 
Element 



3 



3^3 



Work Element 



* Processing Sequence 



ACB 


VTAM AC 

Hex 


4 

8 

C 

10 

14 

18 
1C 

24 

28 

2C 
30 


*) ' 








Dec 


Q 


1 


2 


3 





@NM00008 
ACB ID 


@NM00009 
ACB Subtype 
Field 


ACBLEN2 
ACB Length 


4 


ACBAPID 
Application Indentifier Ptr. 


8 


ACBINRTN 
Interface Routine Addr. 


12 


(35NM00010 
Not used 


16 


@NM00011 
Not used 


(a>NM00012 
Not used 


@NM00013 
Flag Field 
ACBMACR2 


20 


ACBAM 
DTF type 
ACBDOSID 


(3>NM00015 
ACBOFLGS 


(3>NM00017 
Access Method 
ID 


(55NM00018 
ACBERFLG 


24 


(a>NM00019 
Reserved 


ACBDEB 
DEB Pointer 


28 


(3NM00020 
ACB DDNAME 


36 


ACB PASS W 
Password Pointer 


40 




ACt 
Branch Re 


RTN 
turn to User 


44 




@NM00021 
Not used 


48 


ACBUEL 
Pointer User Exit List 



ACB(VTAMACB) (.. .Continued) 



Alphobeticcl List of Fields in@NM00007 
Field Dec Hex Field 



(3NM00008 
@NM00009 
@NM00010 
@NM00011 
@NM00012 
@NM00013 
@NM00015 



0000 0000 @NM00017 

0001 0001 @NM00018 
0012 000C @NM00019 
0016 0010 (o)NM00020 

0018 0012 @NM00021 

0019 0013 ACBAM 
0021 0015 ACBAPID 



Dec 



Hex Field 



0022 0016 ACBDEB 

0023 0017 ACBINRTN 

0024 0018 ACBLEN2 
0028 00 1C ACBPASSW 
0046 002E ACBRTN 
0020 0014 ACBUEL 
0004 0004 



0025 0019 

0008 0008 

0002 0002 

0036 0024 

0040 0028 

0048 0030 



Flag Meanings 

Hex Flag Byte Contents Bit Pattern Pattern 

Disp Pattern Nome Meaning 

0013 @NM00013 Flag Field ACBMACR2 1 ACBLOGON LOGON Bit Flag 1 = 

NLOGON 

.111 1111 (S5NM00014 Not used 

0015 (cuNM00015 ACBOFLGS 111111.. @NM00016 Defined above 

1 . ACBBUSY ACB is busy 

1 ACBLOCK ACB is locked 



ACDEB (ISTACDEB) 



Dec Hex 




ACDTYPE 
Control Block 
Type 



] 



ACDLNGTH 
Control Block 
Length in 
Bytes 



ACDSAF 
Flags 



ACDCHN 
Chain field 



ACDTSKID 
Task ID 



ACDRSV08 
Reserved Preserve Alignment 



ACDDBPFX 
VTAM DEB Prefix Section 



ACDBASIC 
BASIC DEB Section 



ACDVTAM 
VTAM DEB Section 



ACDSIP 
SESSION Control Inbound PAB 



ACDSOP 
SESSION Control Outbound PAB 



ACDEB (1STACDEB) (...Continued) 






1 


2 


3 


ACDASFQ 
ADDR 1st FMCB on DFASY ANY Q 


ACDREFQ 
ADDR 1st FMCB on RESP ANY Q 



ORG ACDTYPE 



ACDOPNAD 
First byte of 
DEB for open 



ORG ACDDBPFX 



ACDRSV01 
Reserved 



ACDLENG 
Length for OS 



ACDAMTYP 
Acces Method 
Type for OS 



ACDRSV02 
Reserved 



ACDRSV03 
Reserved 



ORG ACDBASIC 



ACDTCB 
Pointer to TCB owning this DEB 



ACDDEB 
Pointer to next DEB on DEB Chain of TCB 



ACDPRLEN 
Prefix Length 



ACDDEBID 
Owner DEB 
Identification 



ACDRSV04 
Reserved 



ORG ACDACBAD 



ACDACB 
Pointer to Appl. ACB 



OR G ACDVTAM 



ACDLOCK 
Deblock Lock 



ACDEB (1STACDEB) (...Continued) 
Dec Hex 
44 2C 



ACDRDTE 
Pointer to RDT Entry 



ACDFMOB 
Addr of 1st FMCB on FMCB queue of this DEB 



ACDRAFQ 
Addr of 1st FMCB on Readany FMCB Que 



ACDRARQ 
Addr of 1st RPL on readany RPL que 



ACDPSST 
Addr of the PSS table 



ACDRSV33 
Reserved 



ACDNEPAB 
PSS solicit/read any PAB 



ACDSSPAB 
PSS system services PAB 



ACDSSFLG 
System service 
flags 



ORG ACDVTAM-HS5 





ACDRSV06 
Reserved 


ACDRSV07 
Reserved 




ACDPAPDAT 
Application - ID section 





ACDEB (ISTACDEB) (...Continued) 



12 3 



ORG ACDAPDAT 



ACDAPDDT 
Application Data 



ORG ACDVTAM + 76 



ACDCLDEB 
Close DEB Chain Pointer 



ACDAPDLN 

Length of Applicatic 

ID Data 



ACDOCWAD 
Addr of OCW for use by Close ACB 



ACDRSV1 1 
Reserved fo r Alignment 



Alphabetical List of Fields in ISTACDEB 



Field 


Dec 


Hex 


Field 


Dec 


Hex 


Field 


Dec 


He>^ 


ACDACB 


0037 


0025 


ACDLNGTH 


0001 


0001 


ACDRSV06 


0105 


0069 


ACDACBAD 


0036 


0024 


ACDLOCK 


0040 


0028 


ACDRSV07 


0106 


006A 


ACDAMTYP 


0021 


0015 


ACDNEPAB 


0072 


0048 


ACDRSV08 


0012 


000C 


ACDAPDAT 


0107 


006B 


ACDOCWAD 


0120 


0078 


ACDRSV10 


0036 


0024 


ACDAPDDT 


0108 


006C 


ACDOPNAD 


0000 


0000 


ACDRSV1 1 


0124 


007C 


ACDAPDLN 


0107 


006B 


ACDPRLEN 


0032 


0020 


ACDRSV33 


0064 


0040 


ACDASFQ 


0160 


00A0 


ACDPSST 


0060 


003C 


ACDSAF 


0002 


0002 


ACD3ASIC 


0024 


0018 


ACDRAFQ 


0052 


0034 


ACDSIP 


0128 


0080 


ACDCHN 


0004 


0004 


ACDRARQ 


0056 


0038 


ACDSAOP 


0144 


0090 


ACDCLDEB 


0116 


0074 


ACDRDTE 


0044 


002C 


ACDSSFLG 


0104 


0068 


ACDDBPFX 


0016 


0010 


ACDREFQ 


0164 


00A4 


ACDSSPAB 


0088 


0058 


ACDDEB 


0028 


001C 


ACDRSV01 


0016 


0010 


ACDTCB 


0024 


0018 


ACDDEBID 


0033 


0021 


ACDRSV02 


0022 


0016 


ACDTSKID 


0008 


0008 


ACDFMCB 


0048 


003C 


ACDRSV03 


0023 


0017 


ACDTYPE 


0000 


0000 


ACDLENG 


0020 


0014 


ACDRSV04 


0034 


0022 


ACDVTAM 
ACDVTPRX 


0040 
0000 


0028 
0000 



ACDEB (1STACDEB) (...Continued) 



Hex Flag Byte Contents 
Disp 



0068 ACDSSFLG System Service Flags 



Pattern 


Pattern 


Name 


Meaning 


ACDCACB 


Close ACB in 




Progress 


ACD ABEND 


If ABEND or 




CANCEL in 




progress, used 




as flag to indicate 




that a dump must 




be taken 


ACDA1CLS 


CLOSE issued in 




ISTRAAA1 


ACDRSV09 


Reserved 



Constants in ISTACDEB 



Label 
ACD ID 



Value 
X'OF' 



VTAM Data Extent Block ID 



APT (ISTAOT) 






1 


2 


3 


AOTAPT 
Pointer to APT for this task 


AOTCNT 
Count of open 
ACBs for this 
task 


AOTDSBYT 
Used by 
ISTAPCAS to 
disable via 
STNSM 


AOTRSV02 
Reserved 


AOTRSV03 
Reserved 


autoflagb 

Flags 


AOTRSV04 
Reserved 



AOTFLAGA 

Flags 



ORG AOTAPT + 1 



AOTAPTA 
Same as AOTAPT 



AOTBVA 
Start Addr of VTAM Partition 



AOTVEA 
End Addr of VTAM Partition 



Alphabetical List of Fields in ISTAOT 
Field Dec Hex Field 



Dec Hex Field 



Dec Hex 



AOTAPT 0000 0000 AOTFLAGA 0000 0000 AOTRSV03 0008 0008 

AOTAPTA 0001 0001 AOTFLAGB 0012 000 C AOTRSV04 0013 000D 

AOTONT 0004 0004 AOTOBB 0000 0000 AOTVBA 0000 0000 

AOTDSBYT 0005 ,0005 AOTRSV02 0006 0006 AOTVEA 0004 0004 



AOT(ISTAOT) (.. 


Continued) 








Flag Meanings 










Hex Flag-Byte 


Contents 


Bit 


Pattern 


Pattern 


Disp 




Pattern 


Name 


Meaning 


OOOC AOTFLAGB 


Flags 


1 

.1 

..1 

...1 .... 

.... 1... 
1.. 

1. 

1 


AOTTPEAL 

AOTDUMP 

AOTCNCL 

AOTVTDLY 

AOTUE 
AOTVTSVC 

AOTSWAP 

AOTSKEY 


TPIN macro has 
been issued, used 
only in Attention 
Task AOT 
Dump taken on 
termination, used 
on in a main task 
AOT 

Cancel postponed 
for APS to finish 
Timer exit delayed 
by VTAM AP 
User exit processing 
VTAM SVC 53 o r 
SVC49 

VTAM process 
dispatching 
Supervisor key 
forced for this 
task VTAM 


0000 AOTFLAGA 


Flags 


1 


AOTCAP 


DOS dispatcher call 
to ISTAPCAS needed 






.111 1111 


AOTRSV01 


Reserved 



APT (ISTAPT) 



APTAPTX 
Pointer to pagable portion of APT 



APTRPH 
Posted RPH queue anchor 



APTPAB 
Scheduled PAB queue anchor 



APTUECB 
Scheduled user exit queue anchor 



APTWAIT 
Waiting RPH queue anchor 



APTPIB 
Pointer to PIBfor task 



ORG APTAPTX 



APTFLAGA 
Flags 



ORG APTAPTX+1 



APTAPTXA 
Same as APTSPTX 



@NM00019 
Flags in CS 
operation 


APTPABA 
Same as APTPAB 



Alphabetical List of Fields in ISTAPT 
Field Dec Hex Field 



Dec Hex Field 



Dec Hex 



@NM00019 0008 0008 APTFLAGA 0000 0000 APTRPH 0004 0004 

APTAOT 0024 0018 APTPAB 0008 0008 APTUECB 0012 000C 

APTAPTX 0000 0000 APTPABA 0009 0009 APTWAIT 00] 6 CO 10 

APTAPTXA 0001 0001 APTPIB 0020 0014 



APT(ISTAPT) (...Continued) 
Flag Meanings 



Hex Flag byte Contents 
Disp 



0000 APTFLAGA FLAGS 



Bit Pattern 


Pattern 


Pattern Name 


Meaning 


1 APTRPHEY 


Pre-a I located 




RPH is in use 


.1 APTSUSP 


Waiting for 




Storage Request 


..1 APTVSKEY 


Status of Super- 




visor key bit on 




entry for VTAM 




Process Dispatch 


...1 .... APTUSKEY 


Same for User 




exits 


.... 1... APTUE 


User exit being 




processed 


m APTRSV01 


Reserved 



APT (ISTAPTX) 



APTHDR 
Dummy header 



APTCHAIN 
Chaining Held 



APTTSKID 
Task ID of this task 



APTXRSV1 
Reserved 



APTXPAB 
PAB for TPIO spec scheduling 



APTSAVEV 
Save area for VTAM process dispatching 



APTSAVEU 
Save area for user exit dispatching 



APTXRPH 
Pre-allocated RPH for VTAM process dispatching 



APTXCRA 
CRA for above RPH 



APTSMRPH 
RPH for storage request 



APT (ISTAPTX) (...Continued) 
Dec Hex 
984 3D8 



APTADRR 
Range of Storage for this Partitic 



APTTYPE 
Control Block 
Type 


APTXRSVO 
Reserved 


APTLNGTH 
Length of ISTAPTX 



OR G APTADRR 
984 3D8 



APTADRS 
Start of Range 



APTADRE 
End of Range 



Alphabetical List of Fields in ISTAPTX 



Field 

APTADRE 

APTADRR 

APTADRS 

APTCHAIN 

APTHDR 



Dec 



He> 



Field 



Hex Field 



Dec Hex 



0988 03DC APTSAVEU 

0984 03D8 APTSAVEV 

0984 03D8 APTSMRPH 

0004 0004 APTTSKID 

0000 0000 APTTYPE 



0104 0068 APTXPAB 

0032 0020 APTXRPH 

0876 036C APTXRSVO 

0008 0008 APTXRSV1 

0000 0000 



0016 0010 

0176 00B0 

0001 0001 

0012 000C 



APTLNGTH 0002 0002 APTXCRA 0284 01 1C 



Constants in ISTAPTX 

Label Value Meaning 

APTXTYP X'16' Setting Value for Type 



ATCVT (ISTATCVT) 



Dec He> 




272 


no 


276 


114 


280 


118 


284 


11C 


288 


120 


292 


124 


296 


128 


300 


12C 


304 


130 



ATCCOM 
System Independent Fields 



AT CM AX ID 
Maximum numbe; 
of major nodes, 
0= number of * 



ATCMNT 
PTR to major node table - set by Sys.Def.Ref . by IS 



ATCCDADD 
PTR to CIDADD routine ISTSDDCA ref . by CIDCTL macro 



ATCCDDEL 
PTR to CIDDEL routine ISTSDCCD ref. by CIDCTL macro 



ATCCDFND 
Ptr to CIDFND routine IATSDCCF ref. by CIDCTL macro 



ATCESC01 
PTR to ESC01 



ATCESC02 
PTR to ESC02 



PTR to connectio 



ATCCSMR 
vices master routine 



ATCOCRT 
PTR to open/close routine 



ATCUEP 
Pointer to user ex 



* Entries in the MNT. 



ATCVT (ISTATCVT) ( Continued) 
Dec Hex 



324 144 

328 148 

332 14C 

336 150 

340 154 

344 158 

348 15C 

352 160 

356 164 



ATCSHRTN 
Name of VTAM shared RTN to be loaded 



ATCSHRFG 
Attribute flags 



ATCXRANG 
Number of bits 
in X-value 
portion of CID 



ATCSAF 
Sub area address field 



ATCEPA 
Entry point addr of loaded 



ATCALERT 
Pointer to alert -routine ISTSDCAL 



ATCDVLOD 
Pointer to ISTSDCOD 



ATCTRCPT 
Pointer to trace parm list 



ATCDVT 
Pointer to first DVT on chain 



ATCEPT 
Pointer to first EPT on chain 



ATCMSGP 
Pointer to TPMSG processor 



ATCMSGM 
Pointer to TPMSG - message CSECT 



ATCTRPAB 
Address of trace writer PAB 



ATCVT LOD 
Address of VTAM load list 



ATCVT (ISTATCVT) ( Continued ) 



Dec 


Hex 


360 


168 


364 


16C 


368 


170 


372 


174 



392 188 

396 18C 

400 190 

404 194 

408 198 



ATCECPRT 
ECB for trace file print 



ATCZDVTB 
Address of ISTZCFBI 



ATCECTLP 
TOLTEP ECB 



ATCRVCHS 
Reserved 



ATCCRME 
Vary PSS control mechanism 



ATCHPGM 
Buffer information 



ATCDEBCH 
Close DEB chain Pointer 



ATCTODVT 
The TOLTEP DVT ptr pointed to by 3rd word of P 



AT CADE L 
A delete routine address 



ATCCDPTR 
Pointer to ISTOCCCD- DOS only 



ATCLDNCS 
Pointer to NCSPL for load/dump 

ATCLDECB 
ECB fo load/dump subtask 



ATCVT (ISTATCVT) ( Continued) 



Dec Hex 
412 19C 



444 1BC 

448 ICO 

452 1C4 

456 1C8 

460 ICC 

464 1D0 

468 1D4 



ATCRSV99 
Reserved for later pointers 



ATCAP33 
Pointer to ISTAPC33 



ATCAP35 
Pointer to ISTAPC35 



ATCAP36 
Pointer to ISTAPC36 



ATCDVTLK 
Lock word for DVT lock 



ATCCDFIN 
Pointer to ISTSDCRR 



ATCCDFDN 
Pointer to ISTSDCCN 



ATCVOCLK 
VOCLOCK lock 



ATCRDTLK 
RDTLOCK lock 



ATCRSV97 
DWORD alignment 



ATCVT (ISTATCVT) ( Continued) 



Dec Hex 
480 1E0 



580 244 
584 248 
588 24C 



ATCVPABl 
PAB for vary under PSS Control 



ATCPGPAB 
ERP PAB for purge 



ATCDLRPB 
Dump load & restart P 



ATCCCLAD 
Address of vary ERP (ISTINCCL) 

ATCCDLAD 
Address of vary dump, LD rstrt (ISTINCDL) 

ATCOCCOB 
Address ISTOCCOB 

ATCOCCCB 
Address ISTOCCCB 



ATCVT (ISTATCVT) ( Continued) 



Dec Hex 
592 250 



ATCTIPAB 
A pab for ISTOLTP 



ATCTCIPB 
A pab for TOLTEP CLIP 



ATCVTIPB 
A pab for TOLTEP - VTAM interface 



ATCTCLOM 
Addr TOLTEP CLOP proc. 



ATCVT (ISATCVT) ( Continued) 



Dec Hex 
692 2B4 



ATCTCLIM 
Addr TOLTEP Clip proc. 



ATCVTINM 
Addr TOLTEP-VTAM Intf proc. 



ATCTACB 
TOLTEP ACB 



ATCRSV10 
Reserved 



ATCPTROO 
APAB 



ATCCFEAD 
Addr of ISTINCFE 



ATCVLCNT 
Vary device online counts 



ATCS49XI 
Address of ISTPICXI 



ATCS49XL 
Address of ISTPICXL 



ATCVT (ISATCVT) (...Continued) 
Dec Hex 



784 310 



ATCPTR05 
Reserved 



ATCPTR06 
Reserved 



ATCSOPD 
Session Control 



ATCSIPD 
Session Control 



ATCSECST 
Session Controlsess Term 



ATCNMCTR 
Name Counter 



@NM00009 
Reserved 



ATCSRTAB 
Search LOGON Mode Table RTN Address (ISTINCSH) 



ATCUSSPT 
Default USS Definition Table Address (ISTINCDT) 



ATCMODTB 
Default System LOGON Mode Table Address (ISTINCLM) 



ATCINCW3 
Address of ISTINCW3 



ATCIOECB 
ECB Used by IOS - Pointed to by IOBECEPT 



ATCVT (1SATCVT) (...Continued) 



ATCVDPAB 
SS CP Command Processing PAB 



ATCVFPAB 
SS CP Front End PAB 



ATCVDLCK 
SSCP Serialization Lock 



ATCDOS 
DOS Only Fields 



ORG ATCCOM 



ATCSTAT 
VTAM Status Indicators 



ORG ATCSTAT 



ATCSTAT 1 
VTAM Status 
Byte 1 



ORG ATCSTAT+1 



ORG ATCSTAT+2 



ORG ATCCOM+4 



ATCSTFLG 
Storage 
Management 
Flags 



ATCSTAT2 
Reserved 


ATCSTAT4 
VTAM Status 
Byte 4 



AT CAP I 
Addr of API Routine 



ATCVT (ISATCVT) ( Continued) 



ATCDCFRR 
Pointer to FRR of control layer, initialized by opend 



ATCRDT 
Pointer to first RDT 



ATCSRT 
Pointer to SRT directory 



ATCRSV70 
Reserved 



ATCECMOD 
ECB for modify command proc. 



ATCMODQ 
Pointer for output queue for modify command 



ATCECHLT 
ECB for halt command 



ATCHALTQ 
Pointer to output queue for halt command 



ATCECVRY 
ECB for vary command proc. 



ATCVARYQ 
Pointer to output queue for vary command 



ATCECDSP 
ECB for display command 



ATCDSPLQ 
Pointer to output queue for display command 



ATCOCHA 
Pointer to OCT header 



ATCVT (ISATCVT) ( Continued) 



Dec Hex 
60 3C 



100 64 
104 68 

108 6C 



ATCECSES 
ECB to Halt Session Mode 



ATCECVRQ 
ERP ECB for Vary Req. Info. Request Notificatior 



ATCVPARM 
Address of Vary Parameters 



ATCECOPC 
ECB to Indicate Operator Control Processing Complete 



ATCECNET 
ERP ECB for Network Configuration Request 



ATCECPRM 
Pointer to QAB for ERP's ECB Parameters 



ATCHLTMS 
Pointer to Halt Command or Half Return Message 



ATCFSB 
Pointer to Feedback Status Block 



ATCRSV71 
Reserved 



ATCRDTH 
Pointer RDT Header 



ATCACCTA 
Pointer to Installation Accounting Routin 



ATCAUTHA 
Pointer to Installation Authorisation Routin 



ATCPTCHA 
Pointer to VTAM Patch Area 



ATCVT (ISATCVT) ( Continued) 



Dec Hex 

112 70 

116 74 

120 78 

124 7C 

128 80 

132 84 

136 88 

140 8C 



ATCCONFT 
Pointer to VTAM Configuration Table 



ATCFDVT 
Pointer to first DVT for O/C 



ATCFEPT 
Pointer to first EPT for O/C 



ATCDVTPT 
Address of load mod for type = VTAM tracing 



ATCBPDA 
Pointer to buffer pool directory 



ATCADD 
Pointer to ADD procedur 



ATCREMOV 
Pointer to remove procedure 



ATCIOTRC 
Pointer to I/O trace procedure 



Org ATCIOTRC 



ATCTHTRC 
Addr of TH trace routine 



140 8C 

C 

144 90 

148 94 
152 98 



Or g ATCTHTRC 



ATCTPBUF 
TPIOS buffer trace (ISTRARTP) 



Org ATCCOM+144 



ATCBFTRC 
Pointer to buffer trace procedure 



ATCFBRPH 
Addr of feedback proc RPH 



ATCBLDLA 
Addr of BLDL routine 



ATCVT (ISATCVT) ( Continued) 



Dec 


He> 


156 


9C 


160 


A0 



168 A8 

172 AC 

176 BO 

180 B4 



ATCALOAD 
Addr of Aload Routin 



ATCREADA 
Addr of Source Read Routine 



ATCGTSTR 
Addr of Getstor Routin 



ATCFRSTR 
Addr of Freestor Routine 



ATCSTMA 
Addr of SM Initialization Routine 



ATCACDA 
Addr of First ACDEB 



ATCSMRQ 
Addr of Request Storage Routine 



ATCSMQU 
Addr of Queue Request Rfne 



ATCSMRS 
Addr of Release Storage Routine 



ATCSMRC 
Addr of Recover Storage Routii 



ATCSMBQ 
Pointer to Q'ed Req. SMS Routin 



ATCFIRA 
Addr of Feedback Initiation RPH 



ATCSRTAD 
Pointer to SRTADD routine 



ATCVT (ISATCVT) ( Continued) 



Dec Hex 
208 DO 



ATCSRTDF 
Pointer to Setdele Routine 



ATCDCC60 
Pointer to ISTDCC60 - Ctl. layer move to user area 



ATCDCC61 
Pointer to ISTDCC61 - Ctl. layer move fixed to pagable 



ATCNERST 
Pointer to ISTDCC00 - Request - ST 



ATCNERCV 
Pointer to ISTRCC21 - Receive OB 



ATCNERNE 
Pointer to ISTDCC25 - Read - ANY 



ATCNERFN 
Pointer to ISTDCC02 - Request - FN 



ATCAPOST 
Pointer to VTAM Post Routine 



ATCVTMID 
Host major node I.D. 



ATCRSV1 1 
Reserved 



ATCRCC63 
HSKPANYQ Pointer 



ATCRCC26 
Send Response Pointer 



ATCRCC65 
Set RPL Pointer 



ATCNESAL 
Pointer to ISTDCC24 - Solicit - All 



ATCVT (ISATCVT) ( Continued) 





Hex 
104 

108 

IOC 

Org 
128 

Org 
180 

Org 
304 

Org 
318 

31C 

Org 
320 

324 

328 

Org 
32C 














Dec 


| 




1 ] 2 




3 


260 


Pointer to ISTDCC85 


ATCNERAP 
- Read Any Purge 




264 


ATCACTRM 
Count of Active Terminals 


ATCCIDM 
CID Mask 


268 


ATCMSGSP 
Reserved for 
msg suppression 










ATCCSMR 




296 


Pointer to conn 


ection 


ATCCSMA 
Service Master Routine 




ATCHPGM 








384 


ATCHBFNO 
Number of buffs for 
channel 


Buffer 


ATCHBSIZ 
size in bytes 




ATCVLCNT 








772 


ATCRNCNT 
370X Count 


ATCLCLCT 
3270 Count 




ATCSOPD 








792 


ATCSEC01 
Outbound processing 


796 


ATCSEC10 
DVT 




ATCSIPD 








800 


ATCSEC21 
Inbound processing 


804 


ATCSEC30 
Feedback 


808 


ATCSEC40 
DVT 




ATCSECST 








812 


ATCSEC51 
Recovery DVT 



ATCVT (ISATCVT) (Continued) 



12 3 



ORG ATCDOS 
908 38C 



ATCPRTYQ 
Priority Msg Queue Anchor 



ATCSYSCN 
Address of SYS CON Routin 



ATCCIBPL 
Address of Lib Pool 



ATCCACBA 
Address of Open ACB Routin 



ATCCACBA 
Address of Close ACB Routin 



ATCTET 
Address of VTAM TET 



ATCTETC 
Addr of Current Task Entry in TET 



ATCSV53T 
Addr of Function Table for SVC53T 



ATCSCHRT 
Address of Return to Asynchronous 
Processing Scheduler 



ATCAPESH 
Address of Module to schedule a PAB 
(ISTAPESH) 

ATCAPCST 
Address of ISTAPCST 



ATCSTATA 
Addr of Local Device Status Collector 



ATCLAHRA 
Addr of Local 3270 Attention Handler RPH 



ATCVT (ISATCVT) (Continued) 



ATCRCCYO 
Ptr to Post= Sched Proc. 



OR G ATCRCCYO 
960 3C0 I 



ATCRCFYO 
Alias 



ORG ATCDOS+56 
964 3C4 



ATCINDIC 
Reserved 



ATCSRPAB 
System Reset PAD addre 



ATCINBA 
Addr of System Console Input Buffer 



ATCECBA 
Addr of System Console Input BC 



ATCFQE 
Ptr to Primed Queue Elements 



ATCEIRPH 
RPL Header for Activating Error Msg 
Writer for I/O completion 



AT CF LAGS 
Flag Byte 



ORG ATCDOS+182 



ATCSVC33 
SVC 33 Instruction 



ATCFLDA 
Start of Fixed Area 



ATCVT (ISATCVT) (Continued) 
Dec Hex 



1096 448 



ATCDTFBL 
DTF Builder Routine Address 



ATCTIMER 
Timer Subroutine Address 



ATCR7SVE 
Save R7 for ISTAPEAS 



ATCGVPAG 
Addr of Pageable Area in GETVIS Region 



ATCDCC3X 
Ptr to ISTDCC3X-Extn to ISTDCC30 
for Performance 



ATCRTDOS 
Return to DOS 



ATCRVPTD 
Reserved 



ATCNSECB 
ECB for Attaching NETSOL 



ORG ATCNSECB 



ATCNSPAD 
Alignment 



ATCNSRC 
Return Code 



ORG ATCDOS+216 



ATCNRMQ 
Normal Msg Queue Anchor 



ATCAICTN 
Pointer to ISTAICTN 



ATCVT (ISTATCVT) (Continued) 



Alphabetical 


List of F 


ields in 


ISTATCVT 












Field 


Dec 


Hex 


Field 


Dec 


Hex 


Field 


Dec 


Hex 


(3JNM00009 


0818 


0332 


ATCECMOD 


0024 


0016 


ATCNMCTR 


0816 


0330 


ATCACQA 


0100 


0064 


ATCECNET 


0076 


004C 


ATCNRMQ 


1124 


0464 


ATCACDA 


0176 


00B0 


ATCECOPC 


0072 


0048 


ATCNSECB 


1120 


0460 


ATCAaRM 


0264 


0108 


ATCECPRM 


0080 


0050 


ATCNSPAD 


1120 


0460 


ATCADD 


0132 


0084 


ATCECPRT 


0360 


0168 


ATCNSRC 


1123 


0463 


ATCADEL 


0396 


018C 


ATCECSES 


0060 


003C 


ATCOACBA 


0920 


0398 


ATCA1CTN 


1128 


0468 


ATCECTLP 


0368 


0170 


ATCOCCCB 


0588 


024C 


ATCALERT 


0324 


0144 


ATCECVRQ 


0064 


0040 


ATCOCCOB 


0584 


0248 


ATCLOAD 


0156 


009C 


ATCECVRY 


0040 


0028 


ATCOCHA 


0056 


0038 


ATCAPCST 


0948 


03 B4 


ATCEIRPH 


0980 


03D4 


ATCOCRT 


0300 


012C 


ATCAPESH 


0944 


03B0 


ATCEPA 


0320 


0140 


ATCPGPAB 


0512 


0200 


ATCAPI 


0004 


0004 


ATCEPT 


0340 


0154 


ATCPRTYQ 


0908 


038C 


ATCAPOST 


0236 


00EC 


ATCESC01 


0288 


0120 


ATCPTCHA 


0108 


006C 


ATCAP33 


0444 


01 BC 


ATCESC02 


0292 


0124 


ATCPTR00 


0736 


02E0 


ATCAP35 


0448 


01C0 


ATCFBRPH 


0148 


0094 


ATCPTR05 


0784 


0310 


ATCAP36 


0452 


01C4 


ATCFDVT 


0116 


0074 


ATCPTR06 


0788 


0314 


ATCAUTHA 


0104 


0068 


ATCFEPT 


0120 


0078 


ATCRCCY0 


0960 


03C0 


ATCBFTRC 


0144 


0090 


ATCFESS 


0412 


019C 


ATCRCC26 


0248 


OOF 8 


ATCELDLA 


0152 


0098 


ATCFIRA 


0200 


00C8 


ATCRCC63 


0244 


00F4 


ATCBPDA 


0128 


0080 


ATCFLAGS 


1089 


0441 


ATCRCC65 


0252 


00FC 


ATCCACBA 


0924 


039C 


ATCFLDA 


1092 


0444 


ATCRCFY0 


0960 


03C0 


ATCCCLAD 


0576 


0240 


ATCFQE 


0976 


03D0 


ATCRDT 


0012 


oooc 


ATCCDADD 


0276 


0114 


ATCFRSIR 


0168 


00A8 


ATCRDTH 


0096 


0060 


ATCCDDEL 


0280 


0118 


ATCFSB 


0088 


0058 


ATCRDTLK 


0472 


01D8 


ATCCDFDN 


0464 


01D0 


ATCGTSTR 


0164 


00A4 


ATCREADA 


0160 


00A0 


ATCCDFIN 


0460 


01 CC 


ATCGVPAG 


1108 


0454 


ATCREMOV 


0136 


0088 


ATCCDFND 


0284 


one 


ATCHALTQ 


0036 


0024 


ATCRNCNT 


0772 


0304 


ATCCDIAD 


0580 


0244 


ATCHBFNO 


0384 


0180 


ATCRSV10 


0704 


0200 


ATCCDPTR 


0400 


0190 


ATCHBSIZ 


0386 


0182 


ATCRSV1 1 


0242 


00F2 


ATCCFEAD 


0768 


0300 


ATCHLTMS 


0084 


0054 


ATCRSV16 


0270 


010E 


ATCCIBPL 


0916 


0394 


ATCHPGE 


0384 


0180 


ATCRSV70 


0020 


0014 


ATCCIDM 


0266 


010A 


ATCINBA 


0968 


03C8 


ATCRSV71 


0092 


005C 


ATCCOM 


0000 


0000 


ATCINCW3 


0832 


0340 


ATCRSV97 


0476 


01DC 


ATCCONFT 


0112 


0070 


ATCINDIC 


1088 


0440 


ATCRSV99 


0416 


01AO 


ATCCRME 


0380 


017C 


ATCIOECB 


0836 


0344 


ATCRTDOS 


1116 


045C 


ATCCSMA 


0296 


0128 


ATCIOTRC 


0140 


008C 


ATCRVCHS 


0372 


0174 


ATCCSMR 


0296 


0128 


ATCLAHRA 


0956 


03 BC 


ATCRVPTD 


1118 


045E 


ATCDCC3X 


1112 


0458 


ATCLCLCT 


0774 


0306 


ATCR7SVE 


1104 


0450 


ATCDCC60 


0212 


00D4 


ATCLDECB 


0408 


0198 


ATCSAF 


0318 


013E 


ATCDCC61 


0216 


00D8 


ATCLDNCS 


0404 


0194 


ATCSCHRT 


0940 


03AC 


ATCDCFRR 


0008 


0008 


ATCMAX1D 


0269 


010D 


ATCSECST 


0812 


032C 


ATCDEBCH 


0388 


0184 


ATCMNT 


0272 


0110 


ATCSEC01 


0792 


0318 


ATCDLRP3 


0544 


0220 


ATCMODQ 


0028 


001C 


ATCSEC10 


0796 


031C 


ATCDOS 


0908 


038C 


ATCMODIB 


0828 


033C 


ATCSEC21 


0800 


0320 


ATCDSPLQ 


0052 


0034 


ATCMSGE 


0348 


015C 


ATCSEC30 


0804 


0324 


ATCDTFBL 


1096 


0448 


ATCMSGP 


0344 


0158 


ATCSEC40 


0808 


0328 


ATCDVLOD 


0328 


0148 


ATOMS GSP 


0268 


010C 


ATCSEC51 


0812 


032C 


ATCDVT 


0336 


0150 


ATCNERAP 


0260 


0104 


ATCSHRFG 


0316 


013C 


ATCDVTLK 


0456 


01 C8 


ATCNERCV 


0224 


00 E0 


ATCSHRTN 


0308 


0134 


ATCDVTPT 


0124 


007C 


ATCNERFN 


0232 


00E8 


ATCSIPD 


0800 


0320 


ATCECBA 


0972 


03CC 


ATCNERNE 


0228 


00 E4 


ATCSMBQ 


0196 


00C4 


ATCECDSP 


0048 


0030 


ATCNERST 


0220 


00DC 


ATCSMQU 


0184 


00 B8 


ATCECHLT 


0032 


0020 


ATCNESAL 


0256 


0100 


ATCSMRC 


0192 


OOCO 



ATCVT (ISTATCVT) (Continued) 



Alphabetical List of Fields in ISTATCVT 



Field 


Dec 


Hex 


Field 


Dec 


Hex 


Field 


Dec 


Hex 


ATCSMRQ 


0180 


00 B4 


ATCSYSCN 


0912 


0390 


ATCUSSPT 


0824 


0338 


ATCSMRS 


0188 


00BC 


ATCS49XI 


0776 


0308 


ATCVARYQ 


0044 


002C 


ATCSOPD 


0792 


0318 


ATCS49XL 


0780 


030C 


ATCVDLOK 


0904 


0388 


ATCSRPAB 


0964 


03C4 


ATCTACB 


0700 


02 BC 


ATCVDPAB 


0840 


0348 


ATCSRT 


0016 


0010 


ATCTCIPB 


0624 


0270 


ATCWPAB 


0872 


0368 


ATCSRTAB 


0820 


0334 


ATCTCLIM 


0692 


02B4 


ATCVLCNT 


0772 


0304 


ATCSRTAD 


0204 


oocc 


ATCTCLOM 


0688 


02 BO 


ATCVOCLK 


0468 


01D4 


ATCSRTDF 


0208 


00D0 


ATCTET 


0928 


03A0 


ATCVPAB1 


0480 


01E0 


ATCSTAT 


0000 


0000 


ATCTETC 


0932 


03A4 


ATCVPARM 


0068 


0044 


ATCSTATA 


0952 


03B8 


ATCTHTRC 


0140 


008C 


ATCVTINM 


0696 


02B8 


ATCSTAT1 


0000 


0000 


ATCTIMER 


1100 


044C 


ACTVTIPB 


0656 


0290 


ATCSTAT2 


0002 


0002 


ATCTIPAB 


0592 


0250 


ATCVTLOD 


0356 


0164 


ATCSTAT4 


0003 


0003 


ATCTODVT 


0392 


0188 


ATCVTMID 


0240 


00F0 


ATCSTFLG 


0001 


0001 


ATCTPBUF 


0140 


008C 


ATCXRANG 


0317 


013D 


ATCSTMA 


0172 


OOAC 


ATCTRCPT 


0332 


014C 


ATCZDVTB 


0364 


016C 


ATCSVC33 


1090 


0442 


ATCTRPAB 


0352 


0160 








ATCSV53T 


0936 


03A8 


ATCUEP 


0304 


0130 









Hex Flag Byte 
Disp ^_^^ 



0000 ATCSTAT1 VTAM Status Byte 1 



1... . 
.1.. . 
..1. . 
...1 . 
.... 1 



0001 ATCSTFLG Storage Management 1. 



.1. 



Pattern 


Pattern 


Name 


Meaning 


ATCSTART 


VTAM is starting 


ATCACTIV 


VTAM Is active 


ATCSNHLT 


VTAM session halt 


ATCQKHLT 


VTAM Quick halt 


ATCNETSL 


NETSOL=YES 




specified on CMD 


ATCINHLT 


Internal VTAM 




Halt Quick 


(aJNM00008 


Reserved 


ATCHSDMF 


System Slow Down 




Flag 



X)03 ATCSTAT4 VTAM Status Byte 4 1 . 



ATCPRTAT 1= Trace Print active, 

0= Not active 
ATCPPRT When l,TPRINTin 

process 
ATCMTST When 1 , Modify 

Test in process 
ATCNQSD NOS quiesced 

during Halt 
ATCRSV04 Reserved 



ATCVT (ISTATCVT) (Continued) 
Flag Meanings (Continued) 



Hex Flag Byte Contents 
Disp 



013C ATCSHRFG Attribute Flags 
0441 ATCFIAGS Flag Byte 



Bit Pattern Pattern 

Pattern Name Meaning 

1 ATCLAST Indicate this is 

Last Module 

1 ATCSTOPF Halt msg Recepit 

Flag 

.1 ATCRNLUB LUB is unassigned 

..11 1111 ATCRSV02 Reserved 



AVT 


ISTAVT 
Hex 

4 
8 
C 
10 
14 
18 
1C 
20 
24 

28 

OF 
4 










Dec 





1 


2 


3 





ISTACVT 
Address of VTAM CVT 


4 


ISTAS49 
Address of SVC 49 Code 


8 


ISTAS53 
Address of SVC 53 code 


12 


ISTAPSTA 
Address of APS table 


16 


ISTTXTSZ 
Not used 


ISTVTTIK 
VTAMRP Task ID 


20 


ISTAPSEX 
Address of APS exit 


24 




ISTPHNM 
Phase name of transient 


28 




ISTX1 
Test field 


ISTARID 
Address of RID 


32 


ISTATRT 
Address of VTAM gates in RETAB 


ISTAGTWT 
Address of GATEWAIT routine 


36 


ISTVTTP 
Address of code to check for 
pending timer interrupt 


ISTPDAVP 
Vector for PDAIDS SMS trace 


40 


ISTPDAVP (Cont) 






G ISTA49 






4 


First Byte of 
ISTAS49 





AVT (ISTAVT) (Continued) 



Alphabetical List of F 


felds in 


ISTAVT 












Field 


Dec 


Hex 


Field 


Dec 


Hex 


Field 


Dec 


Hex 


ISTACVT 
ISTAGTWT 
ISTA P SEX 
ISTAPSTA 
ISTARID 


0000 
0034 
0020 
0012 
0030 


0000 
0022 
0014 
OOOC 
001E 


ISTAS49 

ISTAS53 

ISTATRT 

ISTPDAVP 

ISTPHNM 


0004 
0008 
0032 
0038 
0024 


0004 
0008 
0020 
0026 
0018 


ISTTXTSZ 
ISTVTTIK 
ISTVTTP 
ISTX1 


0016 
0018 
0036 
0029 


0010 
0012 
0024 
001D 


Flag Meanings 


















Hex Contents 
Disp 




Bit 
Pattern 


Patterr 
Name 




Pattern 
Meaning 





0004 First byte of ISTAS49 1. 



BPDIR (ISTBPDIR - BUFFER POOL DIRECTORY) 



12 C 

16 10 

20 14 

24 18 

28 1C 

32 20 

36 24 

40 28 

44 2C 



BPDIDSFA 
Buffer Pool ID for SFA 



BPDIRSFA 
A (Small Fixed Pool) 



BPDIDLFA 
Buffer Pool ID for LFA 



BPDIRLFA 
A (Large Fixed Pool) 



BPDIDSPA 
Buffer Pool ID for SPA 



BPDIRSPA 
A (Small Pageable Pool) 



BPDIDLPA 
Buffer Pool ID for LPA 



BPDIRLPA 
A (Large Pageable Pool) 



BPDIDAPA 
Buffer Pool ID for ACE/ ICE 



BPDIRAPA 
Addr. CE/ICE Pool 



BPDIDWPA 
Buffer Pool ID for WS FMCB 



BPDIRWPA 
Addr. WS FMCB Pool 



BPDIDPPA 
Buffer Pool ID for PD 



BPDIR (ISTBPDIR- BUFFER POOL DIRECTORY) (Continued) 



Dec Hex 

52 34 

56 38 

60 3C 

64 40 



BPDIRPPA 
Addr Pageable Data Buf Pool 



BPDIDNPA 
Buffer Pool ID for NW FMCB 



BPDIRNPA 
Addr Non-Working Set FMCB Buffer Pool 



BPDIRVFA 
A (Variable Buffer Length Fixed Pool) 



BPDIRVPA 
A (Variable Buffer Length Pageable Pool) 



Displacement List of Fields in ISTBPDIR 



Dec 



Hex Field 



Dec Hex Field 



Dec Hex Field 



0000 0000 BPDIDSFA 

0004 0004 BPDIRSFA 

0008 0008 BPDIDLFA 

0012 000C BPDIRLFA 

0016 0010 BPDIDSPA 

0020 0014 BPDIRSPA 



0024 0018 BPDIDLPA 

0028 00 1C BPDIRLPA 

0032 0020 BPDIDAPA 

0036 0024 BPDIRAPA 

0040 0028 BPDIDWPA 

0044 002C BPDIRWPA 



0048 0030 BPDIDPPA 

0052 0034 BPDIRPPA 

0056 0038 BPDIDNPA 

0060 003C BPDIRNPA 

0064 0040 BPDIRVFA 

0068 0044 BPDIRVPA 



Alphabeticc 


1 List of F 


ields in 


ISTBPDIR 












Field 
BPDIDAPA 


Dec 
0032 


Hex 
0020 


Field 
BPDIDSPA 


Dec 
0016 


Hex 
0010 


Field 
BPDIRPPA 


Dec 
0052 


Hex 
0034 


BPDIDLFA 


0008 


0008 


BPDIDWPA 


0040 


0028 


BPDIRSFA 


0004 


0004 


BPDIDLPA 


0024 


0018 


BPDIRAPA 


0036 


0024 


BPDIRSPA 


0020 


0014 


BPDIDNPA 


0056 


0038 


BPDIRLFA 


0012 


oooc 


BPDIRVFA 


0064 


0040 


BPDIDPPA 


0048 


0030 


BPDIRLPA 


0028 


001C 


BPDIRVPA 


0068 


0044 


BPDIDSFA 


0000 


0000 


BPDIRNPA 


0060 


003C 


BPDIRWPA 


0044 


002C 



Dec 


Hex 

8 
C 

14 





1 


2 


3 




BTUFOTHA 

1st and 2nd bytes 








BTUBTH 
BTH fie 


ds 


8 


BDUCOUNT 
Count of data in RU 


BTUFORHA 
Three RH bytes 


12 


BTUFORHA (Cont) 


BTUBDU 
BDU fields 






20 













T 



Start of text (Variable length) 



T 



ORG BTUFOTHA 



ORG BTUDEST 



BTUDEST 
Destination narr 



BTUXSAF 
Inbound dest = FSBDAF 



BTUSORC£ 
Source name 



ORG BTUSORCE 



BTUXDAF 
Inbound source = FSB DAF 



ORG BTUBTH-t4 



ORG BTUREQ 



BTUREQ 
Request TAG 



BTUROFLG 
Flag byte 



BTU(ISTBTU) (...Continued) 



12 3 



ORG BTUFORHA 







BTUFORHB 


BTUFHORB 
(Cent.) 







Alphabetical List of Fields in 1STBTU 

Field Dec Hex Field 

BDUCOUNT 0008 0008 BTUFOTHA 

BTUBDU 0013 0C0D BTUFOTHB 

BTUBTH 0002 0002 BTUREQ 

BTUDEST 0002 0002 BTURQFLG 

BTUFORHA 0010 000A BTUSEQ 

BTUFORHB 0010 000A BTUSORCE 



Dec Hex Field 



Dec Hex 



0000 0000 BTUTEXT 0020 0014 

0000 0000 BTUXDAF 0004 0004 

0006 0006 BTUXSAF 0002 0002 

0006 0006 

0007 0007 
0004 0004 



Hex 


Flag Byte 


Contents 


Bit 


Pattern 


Pattern 


Dec 






Pattern 


Name 


Meaning 


0000 




First byte of 
BTUFOTHB 


1111 .... 


BTUFID 


Format ID 


0006 


BTURQFLG 


Flag Byte 


1 

.1 

..1 

...1 .... 
.... 1... 

1 


BTURFIND 
BTUACIND 

BTUFFIND 

BTULBIND 

BTUNONCB 

BTUINPET 
BTUASBTU 

BTUDTRCE 


Request Feedback 
Indicator 
Additional 
Command Indicator 

Functional Flag 

Generated 

Last Block 

Indicator 

No NCB for this 

Request 

Invite Perpetual 

Associate BTU to 

come 

Device Trace 

Requested 



BTU(ISTBTU) (...Continued) 



Constants in 


ISTBTU 




Label 


Value 


Meaning 


BTUMDR 
BTUTHCON 
BTURHCON 
BTUODFC 


X'OA' 
X'OEOO' 
X '039000' 
10 


MDR Id'fier in SYS Resp. byte 

FIDOTH 

FIDO RH 

Difference between BDU and TH Count Fids 






1 


2 


3 


CCBCNT 
Residual Count 


CCBCOM1 
First 

Communication 
byte 


CCBCOM2 
Second 

Communication 
byte 


CCBSTA 
CSW status 


CCBCLS 
CCB class 


CCBPUBNO 
Pub no in table 


CCBCCW 
CCW address 


CCBCOM3 
Third 

Communication 
byte 


CCBCHAP 
Address of Channel Appendage 



ORG CCBCCW 



CCBLIOCS 
LIOCS flags 


CCBCPAD 
Real Address of CCW 



Alphabetical List of Fields in ISTCCB 
Field Dec Hex Field 



Dec Hex Field 



CCBCCW 0008 0008 CCBCOM1 

CCBCHAP 0013 000D CCBCOM2 

CCBCLS 0006 0006 CCBCOM3 

CCBCNT 0000 0000 CCBCPAD 



Dec He> 



0002 0002 CCBLIOCS 0008 0008 

0003 0003 CCBPUBNO 0007 0007 
0012 000C CCBSTA 0004 0004 
0009 0009 



Flag Meanings 

Hex Flag Byte Contents Bit Pattern Pattern 

Disp Pattern Name Meaning 

0002 CCBCCM1 First Communication 1 CCBTRABT CCB Traffic bit 

Byte .1 @NM00009 Reserved 

..1 CCBDISER CCB Disaster 

bit area 

0006 CCBCLS CCB Class 1 CCBREAL Real CCB 

.111 1111 @NM00010 Reserved 



COMRG (ISTCOMRG) 



Dec Hex 




32 20 

36 24 
40 28 



COMDATE 
Job date 



COMPPBEG 
End of supervisor 



COME OSS P 
End of storage protection 



COMSCRAT 
User scratch area 



COMUPSI 
UPS I byte 



COMNAME 
Job name 



COMPPEND 
Address of last byte of PP area 



COMHIPHS 
Address of last fetch o 



COMHIPRG 
Address of longest PP phase 



COMLABLN 
Length of PP label area 



COMPID 
Program interrupt key 



COMEOCA 
Address of end of core 



COMCOMFG 

Machine 
configuration 



COMJCSW1 
Job control 
switch 1 



COMLTACT 

Configuration 

options 



COMLCTL 
Linkage control 
byte 



COMDALC 
Disk address of label cylin 



COMPUBPT 
Address of PUB table 



COMSOB1 
Standard option 
byte 1 



CONJCSW3 
Job control 
switch 3 



COMSOB2 

Standard option 

byte 2 



CONJCSW4 
Job control 
switch 4 



COMFOCL 
Address of FOCL 



COMFAVP 
Address of FAVP 



COMRG (1STCOMRG ) (continued) 



Dec Hex 

68 44 



92 


50 


96 


60 


100 


64 


104 


68 


108 


6C 


112 


70 


116 


74 


120 


78 


124 


7C 


128 


80 



| , 


2 


3 


COMJIBPT 
Address of JIB table 


COMTEBPT 
Null TEB address 


COMFICL 
Address of FICL 


COMNICL 
Address of NICL 


COMLUBPT 
Address of LUB table 


COMSYSLN 
System line count 




COMSYSDT 
System date 




COMLIOCS 
LIOCS communication bytes 


COMPIBPT 
Address of PIB table 


COMCHKID 
Last check point number 


COMLTHID 
Length of LUB ID queue 


COMDIBPT 
Address of background DIB 


COMERBL 
Address of transient CONREG 


COMPCPTR 
Address of PC option table 


COMITPTR 
Address of IT option table 


COMOCPTR 
Address of OC option table 


COMPWTIM 
Key of PGM with IT support 


COMLUBID 
Address of LUB ID queue 


COMLTK 
Logical transient key 


COMSYSPM 
SYSPARM field 


COMJAPT 
Address of job accounting table 


COMSYSCM 
Address of SYSCOM 


COMPIB2 
Address of PIB extension 


COMMICR 
Address of MICR DTF 


@NM00003 
Reserved 


COMBGCOM | COMOPTN 
Address of background COMREG Option 

1 indicator byte 


(SJNM00005 
Reserved 



COMRG (ISTCOMRG) (Continued) 



Dec Hex 
136 88 



COMEXT 
Address of COMREG extension 



@NM00006 
Reserved 



@NM00007 
Reserved 



ORG COMSYSDT 





COMMDD 


COMMDD (CONT) 
MMDD or DDMM part 




COMYYDDD 
YYDDD part 





Alphabetical List of Fields in ISTCOMRG 



Field 


Dec 


Hex 


Field 


Dec 


Hex 


Field 


Dec 


Hex 


(3>NM00003 


0128 


0080 


COMHIPHS 


0036 


0024 


COMNICL 


0074 


004A 


<a)NM00005 


0135 


0087 


COMHIPRG 


0040 


0028 


COMOCPTR 


0104 


0068 


@NM00006 


0140 


008C 


COMITPTR 


0102 


0066 


COMOPTN 


0134 


0086 


@NM00007 


0144 


0090 


COMJAPT 


0116 


0074 


COMPCPTR 


0100 


0064 


COMBGCOM 


0132 


0084 


COMJCSW1 


0056 


0038 


COMPIBPT 


0090 


005A 


COMCHKID 


0092 


005C 


COMJIBPT 


0068 


0044 


COMPIB2 


0124 


007C 


COMCONFG 


0052 


0034 


COMLABLN 


0044 


002C 


COMPID 


0046 


002B 


COMDALC 


0060 


003C 


COMLCTL 


0057 


0039 


COMPPBEG 


0008 


0008 


COMDATE 


0000 


0000 


COMLIOCS 


0088 


0058 


COMPPEND 


0032 


0020 


COMDIBPT 


0096 


0060 


COMLTACT 


0053 


0035 


COMPUBPT 


0064 


0040 


COMEOCA 


0048 


0030 


COMLTHID 


0094 


005E 


COMPWTIM 


0106 


006A 


COMEOSSP 


0010 


000A 


COMLTK 


0110 


006E 


COMSCRAT 


0012 


oooc 


COMERBL 


0098 


0062 


COMLUBID 


0108 


006C 


COMSOB1 


0054 


0036 


COMEXT 


0136 


0088 


COMLUBPT 


0076 


004C 


COMSOB2 


0055 


0037 


COMFAVP 


0066 


0042 


COMMDD 


0079 


004F 


COMSYSCM 


0120 


0078 


COMFICL 


0072 


0048 


COMMICR 


0126 


007E 


COMSYSDT 


0079 


004F 


COMFOCL 


0062 


003E 


COMNAME 


0024 


0018 


COMSYSLN 


0078 


004E 



COMRG (ISTCOMRG) (Continued) 

Alphabetical List of Fields in ISTCOMRG (Continued) 



Field 



Dec Hex Field 



Dec Hex Field 



COMSYSPM 0112 0070 COMUPSI 0023 0017 CONJCSW3 0058 003A 

COMTEBPT 0070 0046 COMYYDDD 0083 0053 CONJCSW4 0059 003B 



Hex Flag Byte Contents 
Disp 



0035 COMLTACT Configuration 
Options 



0086 COMOPTN Option Indicator 
Byte 



Bit Pattern Pattern 

Pattern Name Meaning 

1111 11.. @NM00001 Reserved 

1. CCMASYNC Asynchronous 

processing in 

1 @NM00002 Reserved 

1111 111. @NM00004 Reserved 

1 CCMANCHT Partition Anchor 

Table exists. 



CONFT (ISTCONFT) 
Dec Hex 







44 2C 

48 30 

52 34 

56 38 

60 3C 

64 40 

68 44 



CONCONFG 
Name of configuration table 



CONAPINM 
API Module name 



CONAPSNM 
APS Module name 



CONDMNM 
Device Management Control Layer Module Name 



CONFBPNM 
Feedback processing routine module name 



CONACB \ 

Pointer to VTAM ACB 



CONCIBAD 
Pointer to command input buffer 



CONDISLA 
Display command parameter list address 



CONNCSLA 
NCS parameter list address 



CONHLTLA 
Halt command parameter list address 



COMMODLA 
Modify command parameter list address 



CONVARLA 
Vary command parameter list addres: 



CONENDLA 
The last command processed parameter list address 



CONFT (ISTCONFT) (...Continued) 





Hex 

48 

4C 

50 

54 

58 

5C 

60 

64 

68 

6C 
70 

74 
80 
8C 










Dec 





1 


2 


3 


72 


CONSTCIB 
Start command CIB address 


76 


CONRDBUF 
Buffer address used by read routine 


80 


CONLDPRM 
Pointer to ISTLDPRM 


84 


CONDCBOA 
Address of VTAMLIBDCB 


88 


CONDCBLA 
Address of VTAMLIBDCB 


92 


CONDCBBA 
Address of VTAMLIBDCB 


96 


CONRSV02 
Reserved 


100 


CONBUFSZ 
Size of buffer used by read 
routine 


CONCID 
Operator terminal CID 


104 


CONRES2 
Reserved 


CON LAST 
Last command 


CON HALT 
Halt flags 


CON VARY 
Vary code 


108 


CONDISPL 
Display code 


CONMODFY 
Modify code 






112 




CONFLAGS 
Flags 




CON RS VI 7 
Reserved for 
alignment 


116 


CONSFSBF 
Small fixed list 


128 


CONSPSBF 
Small pageable list 


40 


CONLFSBF 
Large fixed list 



CONFT (ISTCONFT) (...Continued) 



CONLPSBF 
Large pageable list 



CONVFSBF 
Variable length fixed list 



CONVPSBF 
Variable length oageable 



CONIOSBF 
I/O Fixed list 



CONWPSBF 
Working Set Pool list 



CONAPSBF 
ACE/ICE pool list 



CONNPSBF 
Non-working set list 



CONPPSBF 
Pageable data pool list 



CONCRPLS 
CRPL pool list 



CONSFDBF 
Small fixed list 



CONFT (ISTCONFT) (...Continued) 



CONSPDBF 
Small pageable list 



CONLFDBF 
Large fixed list 



CONLPDBF 
Large pageable list 



CONVFDBF 
Variable-length fixed list 



CONVPDBF 
Variable-length pageable 



CONUEDBF 
UECB list 



CONIODBF 
I/O fixed list 



CONWPDBF 
Working set pool list 



CONAPDBF 
ACE/ICE pool list 



CONNPDBF 
Non-working set pool list 



CONFT (ISTCONFT) (...Continued) 





















Dec 


Hex 
188 

194 

1A0 
1A4 

218 

290 

308 

380 

3F8 

470 





1 


2 


3 


392 


CONPPDBF 
Pageable data pool list 


404 


CONCRPLD 
CRPL pool list 


416 


CONFLG01 
Inif/term flags 


CONRSV01 
Reserved - for Alignment 


420 








CONVTHDR 
VTAM RDT header 




536 








CONWTAM 
Application entry for VTAM 




656 








CONTOLTP 
Application entry for TOLTEP 




776 


p CONTRACE — 
Application entry for TRACE 


896 








CONNTSOL 
Application entry for NETSOL 




1016 








CONRECON 
Application entry for RECOVERY 




1136 




ECB to be pos 


CONECDET 
ed upon subtask completion 





CONFT (ISTCONFT) (...Continued) 



• 1 


1 1 2 1 3 


CONSTAFP 
Footprint for non-PSS state rtn. for VTAM task 


CON LIST 
Two character storage a 
the 'List-ID' operand 


eafor 


CONRSV50 
Reserved preserve alignment 


CONCSCB 
Pointer for CSCB 









CONFNSAT 
Attach parameter list for Network solicitor 



CONFTRAT 
Attach parameter list for trace 



CON FID AT 
Attach parameter list for load/dump 



CONFXXAT 
Attach parameter list for SYS def . 



CONFTTAT 
Attach parameter list for TOLTEP 





528 

52C 

530 




CONRSV24 
RESERVED 


1320 


CONGLBBH 


CONRVPT1 
Reserved 


CON UN ITS 
RN Host Buffersize, LBUF DOS/VS 
IQBUF in V/S 1,2 


1324 


ECB used to p 


CONSDECB 
Kt ISTSDCLM to run SYS def IO code 


1328 


CONSDMLC 
Ptr to SYS def parameter list ISTMLCA 



CONFT (ISTCONFT) ( Continued) 
Dec Hex 



1332 534 



ORG CONFLAGS 



CONF01SV 
Host attach save area ptr 



CONSCPID 
SSCPID 



CONUESBF 
UECB list 



CONDSFLG 
Data set flags : 



ORG CONFIX GS+1 



CONOPTFL 
Optional 
services flags: 



ORG CONFLAGS+2 



CONSTAT 
Resource status 
flags : 



ORG CONFLAGS+3 



CON BUFF 
Buffer status flags 



ORG CON BUFF 



First Byte of 
CON BUFF 



ORG CONBUFF+1 



Second Byte of 
CON BUFF 



CONFT (ISTCONFT) (Continued) 













Dec 


Hex 





1 


2 


3 




ORG CONSCPID 






1336 


538 
53C 


CONFCNL 
Functional level 


CONFILL 
Filler 


CONBLKNO 
12-bit Block 
Number 


CONSTFIL* 


1340 


CONSTVAR* 
Variable Portion of station I.D. 







* CONSTFIL is a 4-bit field CONSTFIL and CONSTVAR together 
make up the field CONSTAID, which is a 20-bit Station ID. 



Alphabetical List of Fields in ISTCONFT 



Field 


Dec 


Hex 


Field 


Dec 


Hex 


Field 


Dec 


Hex 


CONACB 


0040 


0028 


CONFTTAT 


1264 


04F0 


CONRSV50 


1146 


047A 


CONAPDBF 


0368 


0170 


CONFXXAT 


1236 


04D4 


CONRVPT1 


1321 


0529 


CONAPINM 


0008 


0008 


CONF01SV 


1332 


0534 


CONSCPID 


1336 


0538 


CON APS BF 


0212 


00D4 


CONGLBBH 


1320 


0528 


CONSDECB 


1324 


052C 


CONAPSMN 


0016 


0010 


CON HALT 


0106 


006A 


CONSDMLC 


1328 


0530 


CONBLKNO 


1338 


053A 


CONHLTLA 


0056 


0038 


CONSFDBF 


0260 


0104 


CON BUFF 


0113 


0071 


CONIODBF 


0344 


0158 


CONSFSBF 


0116 


0074 


CONBUFSZ 


0100 


0064 


CONIOSBF 


0188 


00 BC 


CONSPDBF 


0272 


0110 


CONCIBAD 


0044 


002C 


CON LAST 


0105 


0069 


CONSPSBF 


0128 


0080 


CONCID 


0102 


0066 


CONLDPRM 


0080 


0050 


CONSTAFP 


1140 


0474 


CONCONFG 


0000 


0000 


CON LF DBF 


0284 


one 


CONSTAT 


0112 


0070 


CONCRPLD 


0404 


0194 


CONLFSBF 


0140 


008C 


CONSTCIB 


0072 


0048 


CONCRPLS 


0248 


OOF 8 


CON LIST 


1144 


0478 


CONSTVAR 


1340 


0536 


CONCSCB 


1148 


047C 


CONLPDBF 


0296 


0128 


CONTOLTP 


0656 


0290 


CONDCBBA 


0092 


005C 


CON LPS BF 


0152 


0098 


CONTRACE 


0776 


0308 


CONDCBLA 


0088 


0058 


CONMODFY 


0109 


006D 


CONUEDBF 


0332 


014C 


CONDCBOA 


0084 


0054 


CONMODLA 


0060 


003C 


CONUESBF 


1342 


053E 


CONDISLA 


0048 


0030 


CONNCSLA 


0052 


0034 


CON UN ITS 


1322 


052A 


CONDISPL 


0108 


006C 


CONNPDBF 


0380 


01 7C 


CONVARLA 


0064 


0040 


CONDMNM 


0024 


0018 


CONN PS BF 


0224 


00E0 


CON VARY 


0107 


006B 


CONDSFLG 


0110 


006E 


CONNTSOL 


0896 


0380 


CONVFDBF 


0308 


0134 


CONECDET 


1136 


0470 


CONOPTFL 


0111 


006F 


CONVFSBF 


0164 


00A4 


CONENDLA 


0068 


0044 


CONPPDBF 


0392 


0188 


CONVPDBF 


0320 


0140 


CONFBPNM 


0032 


0020 


CONPPSBF 


0236 


00EC 


CON VPS BF 


0176 


00 B0 


CONFCNL 


1336 


0538 


CONRDBUF 


0076 


004C 


CONVTHDR 


0420 


01A4 


CONFILL 


1337 


0539 


CONRECON 


1016 


03F8 


CONWTAM 


0536 


0218 


CONFLAGS 


0110 


006E 


CONRES2 


0104 


0068 


CONWPDBF 


0356 


0164 


CONFLDAT 


1208 


04B8 


CON RS V01 


0417 


01A1 


CON WPS BF 


0200 


O0C8 


CONFLG01 


0416 


01A0 


CONRSV02 


0096 


0060 








CONFNSAT 


1152 


0480 


CONRSV17 


0115 


0073 








CONFTRAT 


1180 


049C 


CONRSV24 


1292 


050C 









CONFT (ISTCONFT) (Continued) 
Flag Meanings 



Hex Flag Byte Contents 
Disp 



Pattern 



Nai 



Pattern 
Meaning 



006A CONHALT Halt Flags 
006E CONDSFLG DataSet Flags 



1 CONHLTQ Quick flag 

.1 CONHLTS Session flag 

1 (5)NM00003 Reserved 

.1 (3NM00004 Reserved 

..1 (SJNM00005 Reserved 



.1 . 



CONSYOBJ SYS 1 . VTAMOBJ 









is open 






1... CONSYLIB 


SYS1. VTAMLIB 
is open 






.1.. CONSYLST 


SYS1. VTAMLST 


006F CONOPTFL 


Optional Services ].. 


(5>NM00006 


Reserved 




Flags .1. 


(3NM00007 


Reserved 




..1 


(3NM00008 


Reserved 




... 


@NM00009 


Reserved 






1... CONBUFTR 


Buffer Trace 
Requested 






.1.. CONBTUTR 


BTU Trace 
Requested 






. . 1 . CONMODTR 


Module Trace 
Requested 






...1 CONIOTR 


I/O Trace 
Requested 


0070 CONSTAT 


Resource Status 1 . . 


@NM00010 


Reserved 




Flags .1. 


(cdNMOOOll 


Reserved 




..1 


(a)NM00012 


Reserved 




... 


CONSTOR 


VTAM has Storage 






1... CONDSOPN 


Data Sets open 






.1.. CONLODED 


VTAM routines 
loaded 






. . 1 . CONVRYIN 


Network varied in 






... 1 CONACTV 


Operator active 


0071 


First byte of 1. . 


CONSFEX 


Small fixed 




CON BUFF 




pool exists 




.1. 


CONSPEX 


Small paged 
pool exists 




..1 


CONLFEX 


Large fixed 
pool exists 




... 


CONLPEX 


Large paged 
pool exists 






1 . . . CONVFEX 


Variable fixed 
bfr pool (DOS) 






. 1 . . CONVPEX 


Variable pg bfr 
pool (DOS) 
exists 



CONFT (ISTCONFT) (Continued) 



Flag Meanings (Cont 



0071 
(Continued) 



First byte of 
CON BUFF 
(Continued) 



Second byte of 
CON BUFF 



01A0 CONFLG01 1NITAERM flags 



1. CONUECB UECB pool exists 

(VS1 &VS2) 
CONIOEX I/O fixed pool 
exists 

CONWPEX Working set pool 

exists 
CONAPEX ACE/ICE pool 

exists 
CONNPEX Non-working set 

pool exists 
CONPPEX Pageable data 

pool exists 
CONCRPL CRPL pool exists 

CONFTSTM Bit to indicate 

Set Timer 
CONFTTMR Bit to indicate 

Timer is running 
CONFTEXS Exits scheduled 

flag 
CONFTNAC No active 

connections flag 
CONFTNSA Bit to indicate 

Network Solicitor 

active 
CONFTTA To indicate TOLTEP 

active 
CONFTPSA Bit to indicate 

Port Solicitor 

active 
CONNSNEC Indicate Network 

Solicitor is 

necessary 



DEVCH (ISTDEVCH) 






1 


2 


3 


DEVSHCH 
Dev.Sched. 


DEVTCODE 
Device type 
Codes 


DEVMCODE 
Device model 
Code 


DEVFLAGS 
Use depends 
on DEVSHCH 
values 


DEVPHYSA 
Physical 
Device 
Address 


DEVRSV03 
Reserved 



ORG DEVSHCH 



DEVCHAR 
Compatibility 
Existing Code 



ORG DEVTCODE 



DEVCHAR2 
Compatibility 
Existing Code 



Alphabetical List of Fields in ISTDEVCH 
Field Dec Hex Field 



Dec Hex Field 



DEVCHAR 0000 0000 DEVMCODE 0002 0002 DEVSHCH 

DEVCHAR2 0001 0001 DEVPHYSA 0004 0004 DEVTCODE 
DEVFLAGS 0003 0003 DEVRSV03 0005 0005 



0000 0000 

0001 0001 



Hex Flag Byte 
Disp 



0000 DEVCHAR 



Compatibility 
Existing Code 



Bit 


Pattern 


Pattern 


Pattern 


Name 


Meaning 


1 


DEVINPUT 


Device is for 
Input 


.1 


DEVOTPUT 


Device is for 
Output 


..1. ... 


DEVCONVR 


Device is 
Conversation RN 
definition 


...1 ... 


DEVSUBND 


Device has 
schedulable Sub- 
Node 


.... 1.. 


DEVSPS 


DEV is Start Print 
sensitive 



DEVCH (ISTDEVCH) (Continued) 



Flag Meanings (Continued) 



Hex Flag Byte Contents 
Disp 



0000 DEVCHAR 
(Cont) (Continued) 



0003 DEVFLAGS Use depends on 1111... 

DEVSHCH valu 



1111 
1... 

.1.. 


.1.. 
..1. 


..1. 
...1 


1111 
1... 

.1.. 
..1. 



Pattern 


Pattern 


Name 


Meaning 


DEVNNSPT 


Node has Netwrk 




Mngmnt Sprt. 


DEVCCTL 


Node has Conn. 




Cntrl Dependcs 


DEVRSV01 


Reserved 


DEVFCCTL 


Used if Device 




req. conn. Ctrl 


DEVCBSC 


Reset orderly, 




Bi-Synch terminals 




except 3270 's 


DEVCSSL 


Reset at end of 




command. 3270 's 




and Start/Stop Exc. 


DEVCRVB 


Reset immediate. 




Start/Stop terms 




with Reverse Break 




feature 


DEVCSWL 


l=Higher Node is 




switch connection, 




0=Leased connection 


DEVCHAR3 


Compatibility 




existing code 


DEVCATTN 


Terminal can 




interrupt with 




attention 


DEVCCHEK 


Terminal has 




checking 


DEVCSTCL 


Terminal has Station 




Control 


DEVCSLPN 


Terminal has 




Selector Pen 



Constants in ISTDEVCH 



Label 


Value 


Meaning 


DEV2740 


X'OT 


Device 


s a 2740 


DEV2741 


X'02' 


Device 


s a 2741 


DEV1050 


X'03' 


Device 


s a 1050 


DEVTWX 


X'04' 


Device 


s aTWX 


DEVWTTY 


X'05' 


Device 


s a WTTY 


DEV115A 


X'06' 


Device 


s a 115A 


DEV83B3 


X'07' 


Device 


s an 83B3 


DEV2715 


X'08' 


Device 


s a 2715 


DEV2770 


X'09' 


Device 


s a 2770 


DEV2780 


X'OA' 


Device 


s a 2780 


DEV3735 


X'OB' 


Device 


s a 3735 



DEVCH (ISTDEVCH) (Continued) 



Constants in 


ISTDEVCH 






Label 


Value 


Meaning 




DEV3780 


X'OC 


Device 


s a 3780 


DEVI 130 


X'OD' 


Device 


san 1130 


DEVI 800 


X'OE' 


Device 


s an 1800 


DEV3125 


X'lT 


Device 


s a 3125 


DEV3135 


X'12' 


Device 


s a 3135 


DEVSYS3 


X'13' 


Device 


sSYS 3 


DEV3704 


X'16' 


Device 


s a 3704 


DEV3705 


X'17' 


Device 


s a 3705 


DEV2980 


X'18' 


Device 


s a 2980 


DEV3277 


X'19' 


Device 


s a 3277 


DEV3284 


X'lA' 


Device 


s a 3284 


DEV3286 


X'lB' 


Device 


s a 3286 


DEV3275 


X'lC 


Device 


s a 3275 


DEV3741 


X'lD' 


Device 


s a 3741 


DEV3747 


X'lE' 


Device 


s a 3747 


DEVMTA 


X'28' 


Device 


s an MTA 


DEV2972 


X'33' 


Device 


s a 2972 


DEV3271 


X'34' 


Device 


s a 3271 


DEV3272 


X'36' 


Device 


s a 3272 


DEVCC 


X'35' 


Device 


s a Physical Unit 


DEV1052 


X'64' 


Device 


s a 1052 


DEV1053 


X'65' 


Device 


s a 1053 


DEV1054 


X'66' 


Device 


sa 1054 


DEV1055 


X'67' 


Device 


s a 1055 


DEV1056 


X'68' 


Device 


s a 1056 


DEV1057 


X'69' 


Device 


sa 1057 


DEV1058 


X'6A' 


Device 


s a 1058 


DEVI 092 


X'6B' 


Device 


s a 1092 


DEV1093 


X'6C 


Device 


s a 1093 


DEVLU 


X'6D' 


Device 


s a Logical Unit 


DEV545 


X'78' 


Device 


sa545 


DEV1017 


X'79' 


Device 


sa 1017 


DEV1018 


X'7A' 


Device 


sa 1018 


DEV2203 


X'7B' 


Device 


s a 2203 


DEV2213 


XVC 


Device 


s a 2213 


DEV2265 


X'7D' 


Device 


s a 2265 


DEV2502 


X'7E' 


Device 


s a 2502 


DEV50 


X'7F' 


Device 


sa50 


DEVI 255 


X'80' 


Device 


s a 1255 


DEV5496 


X'81' 


Device 


s a 5496 


Model Codes 






DEVMOD1 


X'00' 


Model 1 




DEVMOD2 


X'01' 


Model 2 





DNCB (ISTDNCB) 



Dec Hex 




DNCBHSET 
Current device 
BHset 



Org DNCDOS 



DNCNCB 
Common NCB 



DNCMODE 
Current Device Proc. Optio 



DNCDOS 
DOS TPIOS extension 



DNCSESIQ 
Head of Envite Session Queue 



DNCSESCQ 
Head of Contact Session Queue 



DNCB (ISTDNCB) ( Continued) 



Dec Hex 
60 3C 



DNCSHEDQ 
Command queue 



DNCRESET 
Reset trap 



Or g DNCRESET 



DNCB UFA 
Trapped buffer queue 



DNCRFLG 
Trap flags 



Org DNCRESET+5 



DNCIFMCB 
Address of Invitors FMCB 



DNCICIP 


DNCLICP 


DNCACIP 


Count of l/P 


Limit of l/P 


Count of all 


commands 


commands 


commands 


currently in 


in process 


currently in 


process 




process 



Org DNCDOS+23 



DNCLACP 
Limit of all 
commands 
currently in 
process 



DNCFLAG 
Flag byte 



Org DNCDOS+25 



DNCSAF 
Current session 



DNCB (1STDNCB) (Continued) 



Alphobetical list of Fields in ISTDNCB 
Field Dec Hex Field 



DNCACIP 

DNCBHSET 

DN CBUFA 

DNCDOS 

DNCFLAG 

DNCICIP 



0074 004A DNCIFMCB 

0048 0030 DCNLACP 

0064 0040 DCNLICP 

0052 0034 DNCMODE 

0076 004C DNCNCB 

0072 0048 DNCRESET 



Dec Hex Field 



Dec He> 



0069 0045 DNCRFLG 0068 0044 

0075 004 B DCNSAF 0077 004D 

0073 0049 DCNSESCQ 0056 0038 

0049 0031 DCNSESIQ 0052 0034 

0000 0000 DNCSHEDQ 0060 003C 

0064 0040 



Hex Flag Byte 
Disp 



004A DNCACIP 
004C DNCFLAG 



Contents 


Bit 


Pattern 


Pattern 




Pattern 


Name 


Meaning 


Cnt of all commands 


1 


DNCLCLP 


Last command in 


currently in process 






LCP process 


Flag byte 


1111 .... 


DNCSTAT 


DNCB session 
status 




1 


DNCSESS 


Resource in 
session 




.1 


DNCINVIT 


Invite pending 




..1 


DNCCONT 


Contact pending 




...1 .... 


DNCDISC 


Disconnect 
pending 




.... 1... 


DNCDHO 


Don't honor open 
in progress 




1.. 


DNCBSC 


BSC sense status 
to come 




1. 


DNCRMF 


Record mode flag 




1 


DNCSLOWQ 


Requests queued 
due to slow down 


Trap Flags 


1 


DNCSYNC 


Synchronization 
flag 




.1 


DNCCRF 


Contact reqrd for 
next command 




..1 


DNCTF1 


TOLTEPFlag 1 




...1 .... 


DNCTF2 


TOLTEPFlag2 




.... 1... 


DNCRSI 


Reset suppressed 
Invite indicator 




1.. 


DNCDFE 


Disconnected 
feedback expected 
indicator 




1. 


DNCPSOL 


=1 indicates Dial 
in/port solicitor, 
=0 indicates Dial 
out 




1 


DNCZF008 


Data purge flag 



DNCB (ISTDNCB) (continued) 



Plogs and Masks 
Disp. Flag 
70(46) DNCACIP 

72(48) DNCFLAG 




64(40) DNCRFLG Trap flags 



Mask 


Value 


Means 


DNCLCLP 


X'80" 


Last command in LCP 
process 


DNCSTAT 


X'FO' 


DNCB session status 


DNCSESS 


X'80' 


Resource in session 


DNCINVIT 


X'40' 


Invite pending 


DNCCONT 


X'20' 


Contact pending 


DNCDISC 


X'10' 


Disconnect pending 


DNCDHO 


X'08' 


Don't honor open in 
progress 


DNCBSC 


X'04' 


BSC sense status to come 


DNCRMF 


X'02' 


Record mode flag 


DNCSLOWQ 


x'or 


Requests queued due to 
slow down condition 


DNCSYNC 


X'80' 


Synchronization flag 


DNCCRF 


X'40' 


Contact reqrd for nxt com'd 


DNaFl 


X'20' 


Toltep flag 1 


DNaF2 


X'10' 


Toltep flag 2 


DNCRSI 


X'08' 


Reset suppressed invite 
indicator 


DNCDFE 


X'04' 


Disconnect feedback 
expecte indicator 


DNCPSOL 


X'02' 


= 1 indicates dial 
in/port solicitor, =0 
indicates 


DNCZF008 


X'01' 


Data purge flag 



DTFLT (ISTDTFLT) 



Dec Hex 




DTFFTSD 
Substructure for Seq DTF 



DTFFTDA 
Substructure included with DTFFTSD for DA DTF 



Org DTFFTSD 



16 10 

20 14 

24 18 



Org DTFFTDA 



DTFDEVAD 
Pointer to Device Address 



DTFBLKSI 
Pointer to Block Size 



DTFIOARA 
Pointer to I/O Buffer 



DTFNAME 
Pointer to DTF Name 



DTFSEEKA 
Pointer to Seek Address 



DTFERBYT 
Pointer to Error Byte 



DTFDSKX 
Pointer to Disk Extent Field 



DTFLT (ISTDTFLT (Continued) 



Displacement List of Fields in ISTDTFLT 

Dec Hex Field Dec Hex Field 



0000 0000 DTFDEVAD 
0000 0000 DTFFTSD 
0004 0004 DTFBLKSI 



0008 0008 DTFIOARA 
0012 000C DTFNAME 
0016 0010 DTFSEEKA 



0016 0010 DTFFTDA 
0020 0014 DTFERBYT 
0024 0018 DTFDSKX 



Alphabetical List of Fields in ISTDTFLT 

Field Dec Hex Field 

DTFBLKSI 0004 0004 DTFERBYT 

DTFDEVAD 0000 0000 DTFFTDA 
DTFDSKX 0024 0018 DTFFTSD 



Dec Hex Field Dec Hex 

0020 0014 DTFIOARA 0008 0008 

0016 0010 DTFNAME 0012 000C 

0000 0000 DTFSEEKA 0016 0010 



DVT (ISTDVT) 



ORG DVTHDR 



DVTHDR 
Used by ISTOCCRD and Function Release 



DVTENTRY 
Begin entries (Variable length) 



DVTHFORW 
Points to next DVT on Chain 


DVTHECNT | DVTHUCNT 
Number of entries in the DVT Use Count=Number of EPT's 
1 referencing the DVT 


DVTHFGA 
Flag field 1 





ORG DVTHDR+9 





DVTHFGB 
Reserved 


DVTHLEN 
Length of DVT (bytes) 


DVTHDCNT 
Count of duplicate DVT's 




DV1 
Resc 


RSV15 
rved 


DVTRSV01 
Reserved 



DVT (ISTDVT) (Continued) 



Alphabetical List of Fields 
Field Dec Hex 



Dec Hex Field 



DVTENTRY 0024 0018 DVTHFGA 

DVTHDCNT 0012 000C DVTHFGB 

DVTHDR 0000 0000 DVTHFORW 

DVTHECNT 0004 0004 DVTHLEN 



0008 0008 DVTHUCNT 0006 0006 

0009 0009 DVTRSV01 0020 0014 
0000 0000 DVTRSV15 0014 000E 



Hex Flag byte Contents 
Disp 



0008 DVTHFGA F lag field 1 



Pattern 


Pattern 


Name 


Meaning 


DVTHFGA0 


Flag byte :X'80'=a 




duplicate DVT has 




been built 


DVTHFGA! 


Delete process 




module for this 




DVT 


DVTRSV02 


Reserved 


DVTRSV03 


Reserved 


DVTRSV04 


Reserved 


DVTRSV05 


Reserved 


DVTRSV06 


Reserved 


DVTRSV07 


Reserved 



DVT (ISTDVTE) 



DVTPROC 
Processor Pointer Field 



ORG DVTPROC 



DVTFLAG1 
DVT Flag byte 



ORG DVTPROC+1 



DVTPROCA 
Processor Pointer 



Alphabetical List of Fields in ISTDVTE 
Field Dec Hex Field 

DVTFLAG1 0000 0000 DVTPROC 



Dec Hex Field Dec Hex 

0000 0000 DVTPROCA 0001 0001 



Flag Meanings 



Hex Flag byte Contents 
Disp 



0000 DVTFLAG1 DVT flag byte 



Pattern 


Pattern 


Name 


Meaning 


DVTEXITF 


End of DVT 


DVTRSV08 


Reserved 


DVTRSV09 


Reserved 


DVTRSV10 


Reserved 


DVTRSV1 1 


Reserved 


DVTRSV12 


Reserved 


DVTRSV13 


Reserved 


DVTRSV14 


Reserved 



FMCB (ISTFMCB) 



FMCTYPE 
Control Type 
Block Code 



FMCLNGTH 
Length in 
Bytes 



FMCSAF 
ID of Source 



FMCNXTCB 
Address of next FMCB in ACDEB 



FMCTSKID 
Task Identifier OS - TCB Address, DOS - PIK 



FMCDVTA 
Address of DVT Entry Point Table 



FMCDNCBA 
Address of DNCB for this Node 



FMCFMCBA 
Address of next FMCB for this Node 



FMCUSFLD 
Use Information Field 



FMCSTAT 
Source Status 
Information 



FMCSTAT 1 

Status 

Information 



@NM00002 
Reserved 



FMCCMDFL 
Command F lags 



FMCDEBA 
Address of AD DEB 



FMCRPLH 
Address of Held RPL 



FMCVWT 
RPH Address for Vary Wait 



FMCB (1STFMCB) (Continued) 



Dec Hex 
48 30 



FMCPROCD 
Process OpMon from NIB 



FMCMODE 
Mode Name from NIB 



FMCFASYA 
DFASYany Q Chain 



FMCPAB1 
Control Layer Outbound PAB 



FMCPAB2 
Control Layer Inbound PAB 



FMCPAB3 
Synch with Outbound PAB 



FMCPAB4 
TPIOCS Inbound PAB 



FMCBPAB5 
TPIOCS all but Synch with Outbound PAB 



FMCB (ISTFMCB) (Continued) 






1 


2 


3 


FMCEXLST 
Address of CEXLST 


FMCSIPA 
Address of Session Control Inbound PAB 


FMCNXOSQ 
Next Outbound Sequence nums. 


FMCISSN 
Inbound Sync Sequence Number 


FMCRVD01 
For Control 
Layer XXXX 


FMCSSTAT 

Session-CPM 

Status 


FMCPACE 
Pacing Counts 




FMCCLEXT 
Basic Control Layer Extension 




FMCBHSET 
BHSET ID 
Index for 
connected 
Application 


FMCSTAT2 
Purge flags 


FMCLUSTR 
Count of Start 
CTLS Rec 


FMCIPSEQ 
Invite Perpetual 
Count 


FMCMODEB 
Mode Byte 


FMCCLSEQ 
CL Sequence Numbers 


FMCCLSEQ (Cont. 


FMCCTLB 
Ctl.Type 
outstanding 


FMCRRESP 
Respond Type 
expected 


FMCPSTRS 
Cnt Outstanding Post=RESP 


FMCRSPLM 
RESPLIM Value 


FMCSSEGQ 
Sync. -Flow Segment Queue 



FMCB(ISTFMCB) (Continued) 



Dec Hex 
204 CC 

208 DO 



FMCLOCK 
FMCB Lock 



FMCRDTPT 
Ptr to RDTE after FMCB Disconnect 



FMCASEGQ 
ASYN Flow Segment Queue 



FMCFBAS 
DFASY Data Q Pointer 



FMCFBRE 
Pesp.Data Q Pointer 



FMCSNCTL 
Session Control Field 



FMCFRESA 
Resp. Any Q Chain Ptr 



FMCDOS 
DOS Extention 



ORGFMCCMPS1 



FMCBUFLM 
Limit of Queued Buffers 



FMCBUFNB 
Number of Queued Buffers 



ORGFMCSIPA 



FMCSIP 
Scaffold 



ORG FMCNXOSQ 



FMCNXCFM 
Next Outbound FM Seq. number 



ORG FMCNXCEM 



FMCB (ISTFMCB) (Continued) 






1 


2 


3 



ORG FMCNXOSCH-2 



FMCNXOSC 
Next Outbound SC Seq. Number 



ORG FMCNXOSC 



ORG FMCPACE 



160 


A0 


FMCPACEN 
N Value of 
Pacing 




ORC 


5 FMCPACEN 


160 


A0 


FMCPCNT 



ORG FMCPACE+1 



FMCPACEM 
M Value of 
Pacing 



ORG FMCPACEM 
161 Al FMCMPCNT 



ORG FMCPACE+2 



FMCPACPC 
Current Pacing 
count 



ORG FMCPACPC 



ORG FMCPACE+3 



FMCCVAL 
Chain Values 



ORG FMCCLEXT 



FMCRPLA 
Address of Application RPL 



FMCB (ISTFMCB) (Continued) 



12 3 



ORG FMCRPLA 



FMCRPLRS 
Reserved 


FMCRPLPT 
Pointer to RPL 



ORG FMCCLEXT-Ht 



FMCFBA 
Address of FSB Data Queue 



FMCFBRSV 
Reserved 


FMCFBPTR 
Pointer to FSB 



ORG FMCCLEXT-fS 



FMCRAFM 
Address of FMCB on ACDEB Read Any Queue 



FMCDCLOK 
Control Layer FMCB Lock 



ORG FMCCMPS2 



FMCFLGA 
Flag Field 1 
(Control Layer) 



ORG FMCCMPS2+1 



FMCFLGCL 
Flag Field 2 
(Record Control 
Layer) 



ORG FMCCMPS2+2 



FMCPSCMD 
Port Outstanding 
Command Field 



ORG FMCCMPS2+3 



FMCPSTAT 
Port Solicitor 
Status Flags 



FMCB (ISTFMCB) (Continued) 



12 3 



ORG FMCCLEXT+20 



FMCPRMRC 
Purge Minor 
Return Code 



ORG FMCCLSEQ 





FMCTSQNO 

Expected Response SEQ NR 


FMCBSQNO 
SQNO Last Received 





ORG FMCSSEGQ 



FMCSEGD 
Segmented Input Data Que 



ORG FMCFBAS 



FMCZV002 
Reser Orderly LCPB Address 



ORG FMCZV002 



FMCFBXM 
Pointer to 1st Buffer of TRAN 



ORGFMCSNCTL 



FMCSCFLG 
Flag Byte 



ORG FMCSNC7L+1 



FMCSCCTL 
SC Last CTL 
Received 



FMCSCSQN 
SC Last Seq Nr. Received 



ORG FMCDOS 



FMCREQT 
Outbound Request TAG 



FMCB 


(ISTFM 

Hex 
OR 


CB) (Continued) 










Dec 


• 


1 


2 


3 




3 FMCREQT 




232 


E8 


FMCRTFGS 
Request TAG 
Flag Byte 






OR 


3 FMCREQT+1 






233 


E9 

ORG FMCDOS+2 
EA 


FMCSEQ1 
Next Outbound 
Sequence 










234 




FMCSEQ2 
Next expecte 
Inbound Seq. 


FMCFl^GS 
i FMCB Flags 




OR 


3 FMCDOS44 






236 


EC 


FMCSHEDQ 
Head of Pending RPH Queue 




OR 


3 FMCSHEDQ 




236 


EC 


First Byte of 
FMCSHEDQ 






OR 


3 FMCDOS+8 




240 


F0 

F4 


FMCLCPBQ 
Head of User LCPB Queue 


244 


FMCCCNT 
Current LCCW Count 






OR 


G FMCCCNT 






244 


F4 


FMCTDAF 
DAF of Test Node 






OR 


3 FMCDOS+14 






246 


F6 




FMCTLMOD 
LEXEC 
Command 
Modifier 


FMCBYTE 
Flags 



FMCB (ISTFMCB) (Continued) 



12 3 



ORG FMCDOS+16 



FMCPFCSQ 
Seq Number of Last 1st In Chain 



FMCEXFIC 
First in Chain Sequence#Assoc 
with Exception Resp 



FMCCLRPH 
Ptr to CLS DST 



FMCLRC 
Lost Record Counts (TRACE) 



ORG FMCLRC 
256 100 



FMCOLRC 
Outbound Lost Record Count 



FMCILRC 
Inbound Lost Record Count 



ORG FMCDOS+28 



FMCLXOQ 
LCPBfor Reset Orderly Awaiting Delayed Completion 



ORG FMCPSCMD 



ORG FMCFLAG 



FMCFLGB 
Flag Field 2 
(Control 
Layer) 



FMCB (ISTFMCB) (Continued) 



Alphabetical List of F 


ields in 


ISTFMCB 












Field 


Dec 


Hex 


Field 


Dec 


Hex 


Field 


Dec 


Hex 


@NM00002 


0030 


001 E 


FMCFMCBA 


0020 


0014 


FMCPSTRS 


0196 


00C4 


FMCASEGQ 


0212 


00D4 


FMCFRESA 


0228 


00E4 


FMCRAFM 


0172 


OOAC 


FMCBHSET 


0185 


00B9 


FMCILRC 


0258 


0102 


FMCRDTPT 


0208 


00D0 


FMCBSQNO 


0192 


ooco 


FMCIPSEQ 


0188 


00BC 


FMCREQT 


0232 


00E8 


FMCBUFLM 


0036 


0024 


FMCISSN 


0156 


009C 


FMCRPLA 


0164 


00A4 


FMCBUFNB 


0038 


0026 


FMCLCPBQ 


0240 


00F0 


FMCRPLH 


0040 


0028 


FMCBYTE 


0247 


00F7 


FMCLNGTH 


0001 


0001 


FMCRPLPT 


0165 


00A5 


FMCCCNT 


0244 


00F4 


FMCLOCK 


0204 


oocc 


FMCRPLRS 


0164 


00A4 


FMCCLEXT 


0164 


00A4 


FMCLRC 


0256 


0100 


FMCRRESP 


0195 


00C3 


FMCCLRPH 


0252 


00FC 


FMCLUSTR 


0187 


00 BB 


FMCRSPLM 


0198 


00C6 . 


FMCCLSEQ 


0190 


00 BE 


FMCLXOQ 


0260 


0104 


FMCRTFGS 


0232 


00E8 


FMCCMDFL 


0031 


001F 


FMCMODE 


0052 


0034 


FMCRVD01 


0158 


009E 


FMCCMPS1 


0036 


0024 


FMCMODEB 


0189 


OOBD 


FMCSAF 


0002 


0002 


FMCCMPS2 


0180 


00 B4 


FMCMPCNT 


0161 


00 A 1 


FMCSCCTL 


0225 


00E1 


FMCCPCNT 


0162 


00A2 


FMCNPCNT 


0160 


00A0 


FMCSCFLG 


0224 


00E0 


FMCCTLB 


0194 


00C2 


FMCNXCFM 


0152 


0098 


FMCSCSQN 


0226 


00E2 


FMCCVAL 


0163 


00A3 


FMCNXOSC 


0154 


009A 


FMCSEGD 


0200 


00C8 


FMCDCLOK 


0176 


00 B0 


FMCNXOSQ 


0152 


0098 


FMCSEQ1 


0233 


00E9 


FMCDEBA 


0032 


0020 


FMCNXTCB 


0004 


0004 


FMCSEQ2 


0234 


OOEA 


FMCDNCBA 


0016 


0010 


FMCOASN 


0154 


009A 


FMCSHEDQ 


0236 


00 EC 


FMCDOS 


0232 


00E8 


FMCOLRC 


0256 


0100 


FMCSIP 


0148 


0094 


FMCDVTA 


0012 


OOOC 


FMCOSSN 


0152 


0098 


FMCSIPA 


0148 


0094 


FMCEXFIC 


0250 


OOFA 


FMCPAB1 


0064 


0040 


FMCSNCTL 


0224 


00E0 


FMCEXLST 


0144 


0090 


FMCPAB2 


0080 


0050 


FMCSSEGQ 


0200 


00C8 


FMCFASYA 


0060 


003C 


FMCPAB3 


0096 


0060 


FMCSSTAT 


0159 


009F 


FMCFBA 


0168 


00A8 


FMCPAB4 


0112 


0070 


FMCSTAT 


0028 


001C 


FMCFBAS 


0216 


00D8 


FMCPAB5 


0128 


0080 


FMCSTAT1 


0029 


001D 


FMCFBPTR 


0169 


00A9 


FMCPACE 


0160 


00A0 


FMCSTAT2 


0186 


OOBA 


FMCFBRE 


0220 


OODC 


FMCPACEM 


0161 


00 A 1 


FMCTDAF • 


0244 


00F4 


FMCFBRSV 


0168 


00A8 


FMCPACEN 


0160 


00A0 


FMCTLMOD 


0246 


00F6 


FMCFBXM 


0216 


00D8 


FMCPACPC 


0162 


00A2 


FMCTSKID 


0008 


0008 


FMCFLAG 


0182 


00 B6 


FMCPFCSQ 


0248 


00F8 


FMCTSQNO 


0190 


00 BE 


FMCFLAGS 


0235 


OOEB 


FMCPRMRC 


0184 


00 B8 


FMCTYPE 


0000 


0000 


FMCFLGA 


0180 


00 B4 


FMCPROCD 


0048 


0030 


FMCUSFLD 


0024 


0018 


FMCFLGB 


0182 


00 B6 


FMCPSCMD 


0182 


00 B6 


FMCVWT 


0044 


002C 


FMCFLGCL 


0181 


00 B5 


FMCPSTAT 


0183 


00 B7 


FMCZV002 


0216 


00D8 


Flag Meaning 


















Hex Flag Byte 


Contents 


Bit 




Pattern 


Pattern 


Disp 








Pattern 


Name 


Meani 


ng 


00A3 FMCCVAL 


Chain 


values 


1111 




FMCOBCE 


Current Outbound 














FMCFIRST 


First P 


iece 










.1.. 




FMCMIDLE 


Middl 


5 Piece 














FMCLAST 


LastP 


ece 














FMCONLY 


Only 


3 iece 










.... 


.11 


FMCIBCE 
FMCPRCLS 


Current Inbound 
Presentation Class 
01= Record 



F MCB (ISTFMCB) (Continued) 



Flag Meanings (Continued) 








Hex Flag Byte 


Contents 


Bit 


Pattern 


Pattern 


Disp 




Pattern 


Name 


Meaning 


OOBA FMCSTAT2 


Purge flags 


1 

.1 

.... 1... 
1.. 


FMCVPIP 

FMCZFOOA 

FMCIAIO 
FMCALIPR 

FMCCPIP 

FMCSEQI 


Vary Purge in 

Progress 

Purge Succesfully 

completed 

Inhibit all I/O 

Allocation in 

Progress 

CLSDST Purge in 

Progress 

SEQ/ID, 1 = 

Sequence Number 






11 


FMCRSV87 


Reserved 


OOBD FMCMODEB 


Mode byte 


1 

.1 

1 


FMCHOLD 

FMCCLEAR 

FMCAPQ 

FMCLUQ 

FMCRSTSR 

FMCRESOT 

FMCIBPRG 

FMCPBPRG 


Buffer Flood 
Condition 
Clear in progress 
Application quiesced 
LU quiesced 
Resetsr in progress 
Response outstanding 
l/B Purge chain 
O/B Purge chain 


00 B4 FMCFLGA 


Flag Field 1 


1 


FMCFLGAO 


Data expected 




(Control Layer) 


.1 

1. 

1 


FMCFLGAl 
FMCFLGA2 

FMCFLGA3 
FMCFLGA4 
FMCFLGA5 

FMCFLGA6 

FMCFLGA7 


In Dialogue 

FMCBon ACDEBfor 

Read Any 

Incoming Data Flush 

Purge in progress 

Buffer Threshold 

Exceeded 

Read done to 3735 

(On) 

FMCB is Locked 


00B5 FMCFLGCL 


Flag Field 2 
(Record Control 


I 


FMCFLGBO 


FMCB on ACDEB 
Dfasy any Q 




Layer) 


.1 

1. 

1 


FMCFLGBl 

FMCFLGB2 
FMCFLGB3 
FMCFLGB4 
FMCFLGB5 

FMCFLGB6 

FMCFLGB7 


FMCB on ACDEB 
Req any Q 
Satisfy Dfasy Spec. 
Satisfy Resp. Spec. 
Reserved 
POST=Sched. 
Outstanding 
Hold Response 
Outstanding 
Reserved 



FMCB (ISTFMCB) (Continued) 



Flag Meanings (Continued) 



Hex Flag byte 
DIsp 



Pattern 
Name 



Pattern 
Meaning 



00B6 FMCPSCMD Port Outstanding 
Command Field 



00B6 FMCFLGB Flag Field 2 

(Control Layer) 



00B7 FMCPSTAT Port Solicitor 
Status Flags 



1 FMCINVT Invite 

.1 FMCCNTCT Contact 

..1 FMCRESTI Reset Immediate 

Command 

Outstanding 

...1 FMCPURGE Purge (Reset) 

1... FMCDSEOC Disconnect End 

of Call 
1 . . FMCRDBLK Read Block 

(Start Input) 
11 FMCRSV88 Not defined 

1 FMCFLGA8 Reset Conditional 

is Active 
.111 1111 FMCFLRSV Unused 

1 FMCELKST 

.1 FMCIDVFD 



.1. 



FMCDDOCD Die 



00C3 FMCRRESP 



Respond Type 
Expected 



OOEB FMCFLAGS FMCB Flags 



(3NM00004 
FMCSIRP 



l=Path End 

Response 

1= Exception 

Response 

0= Function MNM 

End Resp. 

1= Reached 

Recovery Mode 

1= Term Self Last 

has Arvd. 

Reserved 

Session Indication 
Req. pend. 
Potential Session 
Indicator 

Copy of Pot.Sess. 
Indicator 
Session Initiation 
Request ended. N 
queue 



FMCB (ISTFMCB) (Continued) 



Flag Meanings 


(Cor 


tinued) 


Hex 
Disp. 


Flag 

FMCFLAGS 
(Continued) 


Contents 


OOEB 





First byte of 
FMCSHEDQ 



00E0 FMCSCFLG Flag Byte 



00E8 FMCRTFGS Request TAG 
Flag Byte 



00F7 FMCBYTE Flags 



001C FMCSTAT Source Status 

Info 



11.. 
..11 

111. 



Pattern 


Pattern 


Name 


Meaning 


FMCSTRE 


Session Termination 




Request ended, no 




Queue posted 


FMCRESET 


Reset Request in 




Progress, do not 




Post 


FMCSIRQ 


Session Initiation 




Request queued for 




Connection 


FMCSTPRT 


Start Print bit 



FMCSHEDG Gating bit 



FMCIBSAC 

FMCOBSAC 

FMCLURO 

FMCAPRO 

FMCSCCLO 

FMCSTCTL 



Save IBSQAC 
Save OBSQAC 
LU owes Response 
Appl owes Response 
Clear outstanding 
1=CLUS already 
Sched. 



FMCRSV12 Reserved 

FMCLBIND Last Block Indicator 

FMCNONCB No NCB Indicator 

FMCINPET Invite Perpetual Ind. 

FMCASBTU Associated BTU 

to Come 

FMCRSV1 1 Reserved 



FMCCRF 
FMCSESAQ 



FMCSSREQ 

FMCBRV4 
FMCBRV5 
FMCBRV6 
FMCBRV7 

FMCPRMTR 

FMCPRMTE 

FMCDAPT 
FMCDEVOF 



Contact Required 

PORTSOL session 

Acquired 

EOT Expected after 

RVI from Reset 

Orderly. 

Session Status 

Change Ind. 

Reserved 

Reserved 

Reserved 

Reserved 

FMCB is a 
Preemptor 
FMCB is a 
Preemptee 
Device Accepted 
Device varied or 
set by Vary DSACT. 



FMCB (ISTFMCB) (Continued) 



Flog Meanings (Continued) 

Hex Flag Contents Bit 

DIsp. Pattern 

001C FMCSTAT .... 1... 
(Continued) 1 . . 

1. 

1 

001D FMCSTAT1 Status Information 1 

.1 

..11 1111 
001F FMCCMDFL Command flags 1 

.1 

..1 

...1 1111 

009F FMQstat Sessfon-CPM 1 

Status .1 

..1 

...1 .... 
.... 1... 
1.. 



Pattern 


Pattern 


Name 


Meaning 


FMCDEDSC 


Device disconnected 


FMCZF007 


Buffer Trace 




Active flag 


FMCLTEAS 


Lost Term Exit 




scheduled for this 




FMCB 


FMCVSP1 


Soft Purge in 




Progress 


FMCVSP2 


A User Request 




was Soft Purged 


FMCHPURG 


Session has been 




Hard Purged 


@NM00001 


Reserved 


FMCCMDR 


1= Initial Self 




Revd 


FMCVSNA 


FMCB for Vary 




Session 


FMCSNA 


User Session with 




New Dev's. 


@NM00003 


Reserved 


FMCSNBI 


Session not Bound 


FMCCIPI 


TPIOS Clear in 




Progress 


FMCUIPI 


Unbind in Progress 


FMCSDTR 


SDT Required 


FMCBIP 


Bind in Progress 


FMCNSALU 


No Session exists 




between the 




Application and 




the LU 


FMCPURCH 


TPIOS Purging 




Chain start 


FMCCONF 


Sick Flag 



Constants In ISTFSB 
Label Value 

FMCZHRIP X'1000' 
Common Constants Follow 

FMTYPE X'03' 

FMCOBCEI B'0001' 

FMCIBCEI B'lT 

FMCRCD 'RECORD' 



Meaning 

RESYNCH In Progress 



Type Code for FMCB 
Equate for Record Mode 



FSB (ISTFSB) 

Dec Hex 




FSBFSB 
FSB without FDB 



FSBFDB 
First FDB 



FSBTYPE 


FSBLNGTH 


FSBMNRCD 


Control 


Length in 


Minor return 


block type 


bytes 


code of physical 
condition 



ORG FSBFSB + 3 







FSBSFLGS 
Tpios session 
flaps 










FSBFSBA 
Address of next FSB 



First byte of 
FSBFSBA 



ORG FSBFSB + 8 



FSBBTH 
BTH fields 



FSBCID 
Communication ID 



FSBSAF 
Sixteen BIT source ID 



FSBDAF 
en BIT destination ID 



ORG FSBBTH + 4 



FSBRQTAG 
Request tag 



ORG FSBRQTAG 



FSBSEQID 
Sequence number of ID, SDCC 



FSBFLAGS 
F lag byte 



FSB (1ST? SB) (continued) 



-1 o 


- 1 ' 


3 


ORG FSBSEQID + 1 








FSBSEQ 

Sequence 

number 




ORG FSBSEQ 








FSBCMD 
LCCVV command 
For local dev 




ORG FSBBTH + 6 








FSBCSWST 
CSW status 


ORG FSBCSWST 






FSBTHFLD 
Transmission header 


ORGFSBTHFLD 








FSBTH1 
TH byte 1 




ORGFSBTH1 








FSBSYSRS 
System response 




ORGFSBTHFLD + 1 










FSBTH2 
TH byte 2 


ORG FSBTH2 










FSBEXTRS 
Extended response 



ORGFSBFSB+ 16 



FSBNETRS 
Network response 



ORG FSBNETRS 



FSBSRCAT 
System response 
category 



ORG FSBSRCAT 



FSBMJRCD 
Major return 



ORG FSBNETRS + 1 



FSBERC | 

Extented response 

conditions I 



ORG FSBFSB + 18 



FSBDMGRS 
Device management response 



FSB (ISTFSB) (continued) 



12 3 



ORG FSBDMGRS 



ORG FSBDMGRS + 1 



ORG FSBFSB + 20 



FSBSS1 
Status sense 
byte 1 



FSBSS2 

Status sense 

byte 2 



FS3LCPB 
Address of LCPB 



FSBMSGID 
Operator message ID 



ORG FSBMSGID 



FSBICNCB 
ICNCB PTR - checkpoint r 



ORG FSBFSB +24 



FSBLCCWA 
LCCW address 



ORG FSBLCCWA 



FSBRLSTS 
Buffer release 
status 



ORG FSBFSB + 28 





FSBTHCNT 
TH data count 


FSBRSV01 
Reserved 


OR 


G FSBNETRS 






FSBCOMBN 


OR 


G FSBCOMBN 






FSBALIGN 

Alignment 

byte 


FSBRHFLD 
Request/response header 



ORG FSBRHFLD 



FSBRH1 
RH byte 1 


FSBRH2 
RH byte 2 


FSBRH3 
RH byte 3 



ORG FSBRQTAG 



FSBLDFLG 
Local device 
flags for 
record mode 



FSB (ISTFSB) 


(Conf 


nued) 




















Dec Hex 





1 


2 


3 




ORC 


J@NM00008 
















12 C 


First byte of 










FSBRQTAG 
















ORC 


J@NM00008+1 






13 D 








Second 


byte of 












st of F 


elds in 




FSBRQTAG 










Alphabetical L 


1STI 


FSB 






Field 


Dec 
0012 


Hex 

oooc 


Field 


Dec 
0024 


Hex 
0018 


Field 


EQ 


Dec 
0013 


Hex 


@NM00008 


FSBLCCWA 


FSBS 


000D 


FSBALIGN 


0016 


0010 


FSBLCPB 


0020 


0014 


FSBSEQID 


0012 


OOOC 


FSBBTH 


0008 


0008 


FSBLDFLG 


0019 


0013 


FSBSFLGS 


0003 


0003 


FSBCID 


0008 


0008 


FSBLNGTH 


0001 


0001 


FSBSRCAT 


0016 


0010 


FSBCMD 


0013 


000D 


FSBMJRCD 


0016 


0010 


FSBSS1 


0018 


0012 


FSBCOMBN 


0016 


0010 


FSBMNRCD 


0002 


0002 


FSBSS2 


0019 


0013 


FSBCSWST 


0014 


000E 


FSBNSGID 


0020 


0014 


FSBSYSRS 


0014 


000E 


FSBDAF 


0010 


000A 


FSBNETRS 


0016 


0010 


FSBTHCNT 


0028 


001C 


FSBDMGRS 


0018 


0012 


FSBRHFLD 


0017 


0011 


FSBTHFLD 


0014 


000E 


FSBERC 


0017 


0011 


FSBRH1 


0017 


0011 


FSBTH1 


0014 


000E 


FSBEXTRS 


0015 


000F 


FSBRH2 


0018 


0012 


FSBTH2 


0015 


000F 


FSBFDB 


0032 


0020 


FSBRH3 


0019 


0013 


FSBTYPE 


0000 


0000 


FSBFLAGS 


0012 


OOOC 


FSBRLSTS 


0024 


0018 








FSBFSB 


0000 


0000 


FSBRQTAG 


0012 


OOOC 








FSBFSBA 


0004 


0004 


FSBRSV01 


0030 


001E 








FSBICNCB 


0020 


0014 


FSBSAF 


0008 


0008 








Flag Meanings 


















Hex Flag 




Contents 


Bit 




Pattern 


Pattern 


Disp Byte 








Patter 


i 


Name 


Mean 


"ng 


000C FSBFLAC 


;s 


Flag Byte 


1... 




FSBRFIND 


Request Feedback 
















Indicator 










.1.. 




FSBACIND 


Additional Command 
Indicator 










..1. 




FSBFFIND 


Funct 


on Flag 
















Generated 










...1 




FSBLBIND 


Last Block Indicator 














FSBNONCB 


No NCB for this 
Request 












1.. 


FSBINPET 


Invite 


Perpetual 
















Response 












.1. 


FSBASBTU 


Associated Response 
to Come 












..1 


FSBDTRCE 


Devic 


e Trace 






















Request 



FSB (1STFSB) (Continued) 
Flag Meanings (Continued) 



Hex Flag Contents 
Disp. Byte 



First Byte of 
FSBRQTAG 



000D Second Byte of 

FSBRQTAG 



000E FSBSYSRS System Response 

000F FSBEXTRS Extended Response 



0002 FSBMNRCD Minor Return Code o 
Physical Condition 



0003 FSBSFLGS TPIOS Session Flags 

0004 First Byte of FSBFSBA 



Bit Pattern 


Pattern 


Pattern Name 


Meaning 


1 FSBRT00 


Logical Error Flag 


.1 FSBRT01 


Contrl Block Error 


..1 FSBRT02 


End of Scheduling 




Block 


...1 .... FSBRT03 


Write/Read Request 


.... 1... FSBRT04 


Feedback Requested 


1.. FSBRT05 


Decrement Sched 




Count on Dequeue 


1. FSBRT06 


Write Request 


1 FSBRT07 


Scheduling Flag 


1 FSBRT08 


Device End 




Notification 


.1 FSBRT0? 


Critical Text Flag 


..I FSBRT0A 


Contact 


...1 .... FSBRT0B 


Disconnect Major 




Return Code Type 




Value 


1 FSBSERR 


Error F lag 


.11 FSBSPHSE 


Response Phase 


...1 1111 FSBSCODE 


Response Code 


111 FSBXFSTS 


First Status 


1 FSBXNORM 


Off for Norm 




First Status 


...1 1111 FSBXCODE 


Extended Response 




Code 


...1 111. FSBXFINS 


Final Status 


1 FSBXLCI 


Leading Chars 




Indicated 


1 FSBMNELI 


Error Lock Indicator 


.1 FSBMNRVI 


RVI Received 


..1 FSBMNATN 


ATTN Received 


...1 .... FSBMNDNU 


Device not Usable 


.... 1... FSBMNEOP 


Output Error 


1.. FSBMNDIF 


Dialog Initiation 




Feature 


1. FSBMNOA 


Operation Aborted 




Due to Con 


1 FSBMNSDA 


Sense Data 




Available 


1 FSBPGBUF 


Pageable Buffer 


.111 1111 FSBRSV02 


Reserved 


1 FSBGATE 


Gating Flag 



FSB 


(ISTFSB) (Continued) 








Flag 


Meanings (Continued) 








Hex 


Flag Contents 


Bit 


Pattern 


Pattern 


Disp. 


Byte 


Pattern 


Name 


Meaning 


0011 


FSBERC Extended Response 


1 


FSBEDI 


End of LCP 
Indicator 




Conditions 


.1 

..1 

...1 .... 
.... 1... 

1.. 

1.. 

1. 

1 


FSBEC1 

FSBEBI 

FSBEM1 

FSBETI 

FSBFBMI 

FSBLMRI 

FSBLGI 

FSBSOHI 


End of Command 

Indicator 

End of Block 

Indicator 

End of Message 

Indicator 

End of Transmission 

Indicator 

First Block in 

Message Indicator 

Logoff Message 

Received 

Leading Graphics 

Indicator 

SOH Indicator 


0012 


FSBSS1 Status Sense Byte 1 


mi i... 


@NM00005 
FSBSSUS 
FSBSSDE 
@NM00006 


Reserved 
Unit Specify 
Device End 
Reserved 


0013 


FSBSS2 Status Sense Byte 2 


n 

..i 


(3NM00007 

FSBSSCR 

FSBSSIR 

FSBSSEC 

FSBSSDC 

FSBSSCC 

FSBSSOC 


Reserved 
Command Reject 
Interv. Required 
Equipment Check 
Data Check 
Control Check 
Operation Check 


0013 


FSBLDFLG Local Device Flags 




FSBLDRMF 


Record Mode Flag 




for Record Mode 


.v.. .... 

..] 

i. 

i 


FSBLDSCF 
FSBLDFME 
FSBLDBBF 
FSBLDEBF 
FSBLDSOF 

FSBLDSIF 

FSBLDCUF 


Session Control Flag 
FME Requested Flag 
Begin Bracket Flag 
End Bracket Flag 
Send Output 
Command Flag 
Send Input 
Command Flag 
Clear/Unbind Flag 


0018 


FSBRLSTS Buffer Release 
Status 




FSBCFTX 


Buffer Contains 
Confid Text 






.in mi 


FSBRLRSV 


Reserved 



FSB (IS7FSB) (Continued) 


Constants in 


ISTFSB 


Label 


Value 


FSTYPE 


X'02' 


FSTRACE 


X'ST' 


FSTYPEA 


X'80' 


FRREJBB 


X'90' 


FRREJBS 


X'94' 


FSTHCON 


XMEOO' 


FRMNSALU 


X'OO" 


FRMRCDMP 


X'29' 


FSATHCON 


X'IFOO' 


FRNORM 


X'OO' 


FRCBLKE 


X'04' 


FRLOGICE 


X'08 1 


FRPHYSC 


X'OO 


FRPPRIEX 


X'OD* 


FRNEGRCC 


X'10' 


FRESPEC 


X'OC 


FRCMDRST 


X'18' 


FRPURGE 


X'lC 


FRDISCNT 


X'28' 


FRMLCCWS 


X'04' 


FRNETP 


X'80 1 


FRLINTR 


X'84' 


FRMDR 


X'88' 


FROLT 


X'8C 


FRNOTIFY 


X'30' 


FRCLRRSP 


X'31' 


Minor Return 


Codes for Normal 


FRMOK 


X'OO' 


FRMRCDPR 


X'04' 


FRMLSYN 


X'04' 


FRMSRCTL 


X'OC 


FRMIRCTL 


X'10' 


FRMRSTEL 


X'40' 


FRMRSTQP 


X'41' 


FRMRELCB 


X'30' 


FRMNPCR 


X'3T 


FRMNPUR 


X'32' 


FRMRSTSR 


X'33' 


Minor Return 


Codes for Control 


FRMINVCF 


X'8T 


FRMIECMD 


X'87' 


FRMLGCNT 


X'88' 


FRMESCNT 


X'89' 


FRMCPCNT 


X-8A' 


FRMINDAT 


X'97' 


FRMINCNT 


X'8B' 


FRMINDTR 


X'17' 


FRMNSEGE 


X'lC 



Meaning 

Type Code for FSB 

Trace FSB 

FID1 FSB 

Rejected Begin Bracket 

Rejected Bracket Status 

3270 Record TH Bytes 1,2 

No Session Exists 

Reset Condi Reject- Error Lock Set 

Asynchronous TH Constant 

Normal Feedback 

Control Block Error 

Logical Error in Access Method 

I/O Error 

RU Purged Due to Exception on Prior Element on Chain 

Condit Commnd Not Performed 

Special Condition 

Command Terminated by Reset 

Request Purged 

Device Disconnected 

LCCW Synch Completion Code 

Network Processing 

Line Trace 

MDR Record 

OLTT 

Notify 

Clear Response 



OK So Far 

Reset Condition Successful, Read Ahead Data Present 

LCCW Synchronization 

CTL Command Session Record 

CTL Command Incident Record 

Reset Error Lock Completed 

Reset of Queue Complete 

Release CB 

Clear Response 

Unbind Response 

Resetsr Response 



Invalid Chaining FLD in LCCW 
Invalid Escape CMD 
Leading Graphics Count > 15 
Escape CMD Count <4 
Copy LCC Count NE 3 
Invalid Data Addr/Length 
Invalid Data Count 
Invalid Data/CNT-Record Mode 
Segmenting Error 



FSB (ISTFSB) (Continued) 
Constants in I5TFSB (Continued) 



Physical Condition Minor Return Codes 



FRMDENOT 


X'OT 


FRMLOERR 


X'88' 


FRMNRP 


X'80 1 


FRMLERR 


X'80' 


FRMLOSNS 


X'89' 


FRMLESNS 


X'8T 


Minor Return Codes for 


FRMVTAME 


X'AO' 


FRMILRS 


X'Al' 


FRMRDIP 


X'A2' 


FRMUSELE 


X'A3' 


FRMINVL 


X'A3' 


FRMCTLCF 


X'A4' 


FRMOLTF 


X'A5' 


FRMCDITS 


X'A6' 


FRMCRNF 


X'A7' 


FRMELNV 


X'A9' 


FRMNELNV 


X'AA' 


FRMLCH 


X'AB" 


FRMNORD 


X'AC 


FRMINVBS 


X'AD' 


FRMSEQER 


X'AE' 


FRMERNR 


X'AF' 


FRMTRUN 


X'BO' 


FRMCPYE2 


X'BT 


FRMRELNP 


X'B2' 


FRMCPYE1 


X'B3' 


FRMCPYE3 


X'B3' 


FRMPRM1 


X'B4' 


FRMPRM2 


X'B5' 


FRMBHNDG 


X'B6' 


FRMMDNDG 


X'B7' 


FRMRCNA 


X'W 


FRMRDLGO 


X'B9' 



3270 Device End Notification 

3270 Local Output Error Without Sense 

Negative Response to Polling 

3270 Loc I/O Error without Sense 

3270 Loc Output Error with Sense 

3270 Loc I/O Error with Sense 



VTAM Error 

Incompatable Local/Remote Sysgens 
Reset or Deactivate + Clear in Progress 
User Logic Error 
User Logic Error 
Control Command 
OLTT Failure 

Conflicting Dialogue Initiation/Termination 
Conversational Reply not Feasible 
Escape LCCW not Valid 
Non Escape LCCW not Valid 
LCCW Count Exceeds 255 
No Read where Required 
Invalid BTU System Response 
Response Sequence Error 
Expected Response not Received 
Data Truncation Occurred 

Attempt to Copy from Device on Different Cluster 
Reset Error Lock not Performed 
Attempt to Copy from UNOP DEV 
Attempt to Copy from a Device 
. Attempt to Preempt Preempted FMCB 
Attempt TP Preempt an FMCB with Preempt Pending 
Dialogue Entry Failed Due Invalid BH Set 
Dialogue Entry Failed Due Invalid Processing Options 
Read Continuous not Allowed 
Read with Data Length GT Internal TPIOS only 



ir Return Codes for Conditional Command not Performed 



FRMNRCC X'00' 

FRMYTC X'80' 



Reset not Performed 
Yielded to Contention 



Minor Code for Command Reset 

FRMCDRST X'00' Command has been Reset 



FSB (ISTFSB) (Continued) 

Constants in tSTFSB (Continued) 

Label Value Meaning 



Minor Return Codes for Notify 

FRMPREMT X'OB' 

FRMRESTR X'OC 

FRNCDTRM X'OD' 



TOLTEP Preempt 
Restore After Preempt 
Conditional Term Self 



Minor Return Codes for Request Purged 



FRPRARSS 


X'OT 


3705 Abend, Restart Successful 


FRPRABND 


X'02' 


Early Warn, Recov in Prog 


FRPPCHFL 


X'03' 


Permanent Channel Failure 


FRPRANSH 


X'04' 


Auto Network Shutdown 


FRPAPABD 


X'05' 


Application Abended 


FRPCLSDO 


X'06' 


CLSDST Occurred 


FRPVRYOF 


X'07' 


Vary Offline Occurred 


FRPDISCO 


X'OB' 


Disconnect Occurred 


FRPDBTEX 


X'09' 


Buffer Threshold Exceeded 


FRPRTF 


X'10' 


Temp Record Device Failure 


FRPRTS 


X'll' 


Terminate Self 


FRPRAP 


X'OA' 


Appl Issued Clear 


FRPRPR 


X'OB' 


Preempt 


FRNFRE 


X'OC 


Restore 


FRPARSSL 


X'81' 


This is last Operation Purge for 3705 Abend, Restart 


Minor Return Codes for Network Processing 


FRMMTAID 


X'OO' 


MTA Device Identified 


FRMNPLQ 


X'04' 


Neg Poll Limit Reached Queue Option 


FRMNPDES 


X'08' 


Device End Status 


FRMNPSE 


X'80 1 


Error Sense/Status 


FRMDEBSF 


X'84' 


Device Error - BSC Status to Follow 


FRMBIDE 


X'OC 


BSC ID Error 


FRMMTABS 


X'18' 


MTA/BSC Verify Successful 370X 


FRMBSCR 


X'90' 


BSC ID Verify Successful (in Host), Error Lock Set 


FRMNUTRM 


X'94' 


BSC ID Verify Unsuccessful Error Lock Set 


FRMNPHPS 


X'10' 


Hold - Pending Sense/ST 


FRMNPRMD 


X'20' 


Request Manualdial 


FRMBSCOK 


X'lC 


BSC ID Association Success- Ful in TPIOS 


FRMBSCKO 


X'lE' 


BSCID Successful in VS1 TPIOS 


FRMUNID 


X'14' 


Unidentified Dial in Terminal 


FRMNPRDV 


X'42' 


Reset Conditional Failed 


FRMFIRM 


X'10' 


LU Failed 


FRMTERM 


x'ir 


Terminate Received 



Minor Return Codes for Line Trace 



FRMLINTR X"00' 

FRMLTRE X'04' 



Line Trace 

Line Trace Terminated by ERR 



Minor Return Codes for MDR Records 
FRMMDR X'00' MDR Records 



FSB (ISTFSB) (Continued) 
Constants in ISTFSB (Continued) 



Minor Return Codes for OLTT 



FRMOLTR 

FRMOLTE 

FRMOLTNC 

FRMOLTNT 

FRMOLTNS 



X'80' 
X'04' 
X'90' 
X'9T 
X'92' 



OLT Request Message 

OLTT CMD Terminated 

No CCW String Queued 

CCW String Queued - Not Test Mode Reqs 

I/O not Started - HDV not Issued 



***** Minor Return Code for Command Reset **** ** 

FRMRSTRM X'80' Reset by Successful TRM 

FRMRUTRM X'8T Reset by Successful TRM 

**** Minor Return Codes for Physical Condition **** 

FRMUSDA B'OOOOOOOT Unsol Sense Data Avail 

FRMSE B'10000001' Error Sense Data Avail 

FRMUSE B' 1000000 1' Error, Unsolicited, Sense 

FRMDDR X'90' Asyn Dial Discon Received 

FRMNCLR X'OA' Cleared by Clear 

FRMCU X'06 1 Cleared by Clear/Unbind 

FRMCUN X'07' Cleared by Clear/Unbind/Notfy 



NCP System Response Field 

Response Phase 

NCPPHSE0 B'00' 

NCPPHSE1 B'01' 

NCPPHSE2 B'10' 

NCPPHSE3 B'lT 



Phase Response 
Phase 1 Response 
Phase 2 Response 
Phase 3 Response 



Phase Non Error 

NCPDAC B 

NCPMTAID B' 

NCPCAPM B 1 

NCPCASM B' 

NCPESYSS B 

NCPLSYSS B' 

NCPICOMP B' 

NCPMDR B 1 

NCPANSCT B' 

NCPANSOP B 1 

NCPANSC B 1 

NCPMSLOG B' 

NCPOFLO B' 

Phase 1, 2, 3n 

NCPOK 

NCPLGR 

NCPOKD 

NCPNPLQ 

NCPOLTR 

NCPNPLNW 

NCPLINTR 

NCPBSTAT 



Responses 

'0001 1 ' Device Assyn Complete 

'00100' MTA Device Identified 

'00101 ' Channel Adapter to Prim Mode 

'001 10" Channel Adapter Secondary Mode 

'001 11 ' Entering System Slowdov/n 

'01000' Leaving System Slowdown 

'01001' Init Complete 

'01010' MDR Record 

1 1 101 1 ' Auto Network Shutdown via Chanr 

'11 100' Auto Network Shutdown via Operc 

'11101' Auto Network Shutdown Complete 

11110' Serviceability Aid Mass Storage Logging 

B' 1 1 1 1 1" Overflow Configuration 

n Error Responses 

B '00000' Command OK So Far 

B'00001' Leading Graphics Received 

B'00010' OK So Far with Date 

B'OOOIT Negitive Poll Limit Queue Option 

B'00100' OLT Request 

B'001 10' Negative Poll Limit - Nowait Option 

B'00111' Line Trace 

B'OOIOT BSC Status Message 



I Timeout 
ions Panel 



11-95 



FSB (ISTFSB) (Continued) 



Constants in 


ISTFSB (Contin 


ued) 


Label 


Value 


Meaning 


Phase Error 


Responses 




NCPCHERR 


B'00000' 


Channel Error 


NCPIRID 


B'OOOOT 


Invalid Resource ID 


NCPICMD 


B'00010' 


Invalid Command 


NCPIMOD 


B'00011' 


Invalid Modifier 


NCPRSIP 


B'00100' 


Reset or Deactivate Progress 


NCPDIACT 


B'00101' 


Device Inactive 


NCPLIACT 


B'oono 1 


Line Inactive 


NCPCNVR 


B'00111' 


Command not Valid for Resource 


NCPCSXE 


B'01000' 


Command Syntax Error 


NCPCNBS 


B'oioor 


Command did not Conform to BSC Specificati 


NCPICDL 


B'01010' 


Invalid Control Data Leng 


NCPRSNP 


B'01011' 


Reset not Performed 


NCPGPA 


B-oioir 


Gen. Poll Aborted 


NCPDNCR 


B'01100' 


Data not Core Resident 


NCPDSQL 


B'onor 


Dial Set Queue Limit Reached 


NCPSDLI 


B'01110' 


Switched Device Line Incompatibility 


NCPITXL 


B'onir 


Invalid Text Length 


NCPICOD 


B'looor 


Invalid Control Data 


NCPINBTU 


B'10010' 


Incomplete BTU 


NCPDATIU 


B'10100' 


Data in Use 


NCPICCM 


B'loior 


Invalid Control Command or Modifier 


NCPOLTRJ 


B'10110' 


OLT Command Rejected 


NCPMULTD 


B' 11O0O' 


Multiple Dial Requests 


NCPMODI 


B'lioor 


Mode Inconsistency 


NCPBUFNA 


B'11010' 


Buffer not Available 


NCPSYSS 


B-noir 


Command Rejected System in Shutdown 


NCPERLS 


B'11100' 


Command Rejected Error Lock Set 


NCPCNOP 


B-inor 


Command Rejected Channel Inoperative 


NCPCRS 


B'11110' 


Command Reset or Line Deactivated 


NCPESCO 


BMiiir 


Phase Error Escape 



Extended Response (Final Status) for Phase Error Escape 
NCPIPLE B'OOOOI' IPLLockon 

NCPIVNE B'00101' Invalid Node 

NCPTELE B'00100' Trunk Error Lock on 



Phase 1, 2, 3 Error Responses 



NCPDACHK 


B'00000 ' 


NCPPIVR 


B'OOOOI ' 


NCPIVR 


B'00010' 


NCPNPLW 


B'00011' 


NCPYCNT 


B'00100' 


NCPDEBF 


B'ooior 


NCPBIDER 


B'00110' 


NCPLTRT 


B'00111' 


NCPOCT 


B'01000' 


NCPSSNS 


B'oioor 



Data Check 

Possible Interventions Required 

Intervention Required 

Negative Poll Limit Wait Option 

Yield to Contention 

Device Error — BSC Status to Follow 

BSC ID Error 

Line Trace Terminated 

OLT Command Terminated 

Session not Started BSC Status Message 



FSB (ISTFSB) (Continued) 



Constants in 


ISTFSB (Continued) 


Label 


Value 


Meaning 


NCPESTAT 


B'01010' 


BSC Error Status Message 


NCPDCREC 


B'OHOO' 


Data Disconnect Received 


NCPBRREC 


B'lOOll' 


Break Received 


NCPCRJS 


B'11000' 


Contact Rejected Session Started 


NCPDDIC 


B'llOOT 


Dial Data Inconsistency Command Reset 


NCPIPLR 


B'OUOT 


IPL Required 


NCPTRNKE 


B'01110' 


Trunk Error 


NCPBLKR 


B'oinr 


Remote Block Returned Host 



NCP Extended Response Field Values 
First Status Values 



NCPXCNTL 


B'000' 


Control 


NCPXTXT 


B'001' 


Text 


NCPXTTXT 


B'010' 


Transparent Text 


NCPXHEAD 


B'oir 


Heading 


NCPXSPEC 


B'100' 


Special 


NCPXHCHK 


B'lll' 


Hardware Check 



Final Status Values with Norn 
Transparent Text or Heading 



NCPXTIMT 

NCPXCUTF 

NCPXABLK 

NCPXEHE 

NCPXDCE 

NCPXWRAK 

NCPXRSBE 

NCPXETX 

NCPXETB 

NCPXENQ 

NCPXEOT 

NCPXRVI 

NCPXPACK 

NCPXWACK 



B'0000' 
B'0010' 
B'0011' 
B'0100' 
B'0101' 
B'0110' 
B'1000' 
B'lOOT 
B'1010' 
B'1011' 
B'1100' 
B'llOT 
B'1110' 
B'llH' 



j| First Status Le. Control, Text, 



Timeout 

Cutoff 

Abort Block 

EOT Halted ERP 

DLE Control End 

Wrong ACK 

Received Sub Block I 

End of Text 

End of Block 

Enquiry 

End of Transmission 

Reverse Interrupt 

Positive ACK 

Wait ACK 



Final Status Values with Special First Status 
Timeout — same as Normal First Status 



NCPXCREJ 


B'OOOl' 


Command Reject 


NCPXBPE 


B'0010' 


Buffer Pool End 


NCPXSLTD 


B'ooir 


Selected 


NCPXRDS 


B'0100' 


Received Disconnect Signal 


NCPXLDTA 


B-oior 


Lost Data 


NCPXRSET 


B'0110' 


Reset 


NCPXPLLD 


B'onr 


Polled 


NCPXXSBE 


B'1000' 


Transmit Sub Block End 


NCPXESWR 


B'lOOT 


EOT Sent after Wack Received 



FSB (ISTFSB) 


(Contim 


jed) 




Constants in ISTFSB (Conti 


inued) 


Label 


Value 




Meaning 


NCPXRBT 


B'1010 1 




Received Break in Text 


NCPXPLLS 


B'lOll' 




Polling Stop 


NCPXEOTS 


B'1100' 




EOT Sent 


NCPXRCB 


B'llOl' 




Received Break 


NCPXDSCT 


B'1110' 




Disconnected 


NCPXCNTD 


B'llll" 




Connected 


Final Status Val 


ues with Hardw 


are Check First Status 


NCPXEQUC 


B'0000' 




Equipment Check 


NCPXCSBC 


B'0010' 




CSB Check 


NCPXADC 


B'0100' 




Adapter Check 


NCPXUSER 


B'0110' 




User Error 


NCPXMODC 


B'1000' 




Modem Check 


NCPXDTOC 


B'1010' 




DSR Turn on Check 


NCPXDTFC 


B'1100' 




DSR Turn off Check 


NCPXACUC 


B'1110' 




ACU Check 


**** Miscellaneous Equate 


,**: 


** 


FSBLCWMX 


X'FF' 




Max^ LCCW's LCPB 


FRMCRJSS 


X'08' 




Contact Rjcted, Sesn Started 


FSBNRMST 


X'OC 




Normal I/O Status of CE, DE 



Session Flag Values 


FSESCS 


X'01' 


FSESIS 


X'02' 


FSESCR 


X'03' 


FSESDS 


X'04' 


FSESCWDS 


X'05' 


FSESIDS 


X'06' 


FSESIADS 


X'07' 


FSESDF 


X'08' 


FSESCF 


X'09' 


FSESIF 


X'OA' 


FSESSSDF 


X'OB' 


FSESISDF 


X'OC 


FSESIR 


X'OE' 


RH, TH, Sense 


Constants 


FSSEQSNS 


X'OOOOOOOO' 


FSSEQSLN 


X'04' 


FSEPRRH 


X'930100' 


FSDEONLY 


X'0200' 


FSSNAMSK 


X'3FFF' 



Contact Successful 

Invite Successful 

Contact Rejected 

Disconnect Successful 

Contact/Write/Disconnect Successful 

Invite/Disconnect Success 

Invite W. Auto Restart Completed a Cycle 

Comm'd with Discon. Failed 

Write with Contact and Disconnect Failed 

Invite with Connect Failed 

Write with Contact and Disconnect Failed to End Session 

Invite Started Session but Disconnect Failed 

Invite Rejected - Disc Sent 



SEQNum Sense Field 

Length of Above 

Stand-Alone Pacing Response RH 

DE Only Status 

Mask to Zero First Two Bits of Status 



ICE (1ST1CE) 



Dec Hex 




ICEFLAGS 
Flag Bytes 



ICE SUB J 
Address of ACDEB or RDT 



ICEOBJ 
Address of RDT or ACDEB 



ICESUBJQ 
Link Field for Sub Chain 



ICEOBJQ 
Link Field for OBJ Chai 



ICESIDE 
Field Link for Other Ices 



ICEDATA 
Address of Request Data 



ICERPHA 
Address of RPH 



(a>NM00002 
PAD to Full Word 



ICEUECBX 
Anchor for Chain of UECBS or ICX 



ICERSC2B 
Resource 2 Name from Initiate RU 



ICE (IST1CE) (Continued) 



Alphabetical List of F 


ields in 


ISTICE 










Field Dec 


Hex 


Field 


Dec 


Hex 


Field 


Dec Hex 


@NM00002 0029 
ICEDATA 0020 
ICEFLAGS 0028 
ICEOBJ 0004 


001D 
0014 
0010 
0004 


ICEOPJQ 
ICERPHA 
ICERSC2B 
ICESIDE 


0012 
0024 
0036 
0016 


oooc 

0018 
0024 
0010 


ICESUBJ 

ICESUBJQ 

ICEUECEX 


0000 0000 
0008 0008 
0032 0020 


Flag Meanings 














Hex 

Disp Flag Byte Cor 


itents 




Bit 
Pattern 


Pattern 
Name 


Pattern 
Meaning 


001 C ICEFLAGS Fla 


g Bytes 




1... 
.1.. 
..1. 

...1 


1... 
.111 


ICESPEC 
ICEICX 
ICELGCN 

ICERSC2F 

ICESTAPR 
@NM00001 


Specific Accept 
ICX is Present 
Acquire is Logon 
Type 
1=ICERSC2B is a 

0=no name 
Shoulder Tap 
Slack 



LCCW (ISTLCCW) 






1 


2 1 3 


LCCWOP 

Operational 

Cocfe-Control 


LCCWFLAG 
Flag Byte 


LCCWCNT 
Data Count 


LCCWDATA 
Data Address or Immed. Data 



Alphabetical List of Fields in ISTLCCW 

Field Dec Hex Field Dec Hex Field Dec Hex 

LCCWCNT 0002 0002 LCCWDATA 0004 0004 LCCWFLAG 0001 0001 
LCCWOP 0000 0000 

Flag Meanings 



Hex 

Disp Flag Byte Contents 



0000 LCCWOP Operation Code 
-Control 



0001 LCCWFLAGFlag Byte 



Pattern 


Pattern 


Name 


Meaning 


LCCWSI 


Sess Init/Start 




Dialog Fig 


LCCWSD 


Sess Discon/End 




Dialog Fig 


LCCWRWOP 


Read/Write 




Operation Code 


@NM00001 


Reserved 


LCCWSOP 


Special Operation 




Like Erase or 




Read Cont 


LCCWCTL 


Control Type 


LCCWMODE 


Mode Type 


LCCWTYPE 


Operation Type 


LCCWCD 


Chain Data 


LCCWCC 


Chain Command 


LCCWCKPT 


Suppress 3705 Check 




Point Record 


LCCWNTVC 


Do not Perform 




Valchek 


LCCWIDAT 


LCCWDATA 




Contains Data 


LCCWLSI 


LCCW Synch 




Indicator 


LCCWPER 


Post=Resp 


LCCWRFI 


Request Feedback 




Indicator 


LLCWACI 


Addition Command 




Indicator 



LCCW (ISTLCCW) ( Continued) 



Constants in ISTLCCW 



LXDQ 


X'3B' 


Reset Device Queue 


LXEC 


XMB' 


Reset at End of Command 


LXO 


X'5B* 


Reset Orderly 


LCCWPRGE 


X'6B' 


Purge 


LWH 


X'OF' 


Write Header Indi. 1st Block 


LWRVI 


XMF' 


Write RVI 


LWNA 


X'2F' 


Write Negative Ack 


LWAA 


X'3F' 


Write Alternate Ack 


LWPLG 


X'5F" 


Write Ack Leading Graphics 


LWNLG 


X'6F' 


Write Nack Ledaing Graphics 


LSMDE 


X'4F' 


Set Mode 


LIFBM 


X'7F' 


Indie 1st Block of Message 


LTEST 


X'FE' 


Test LCCW 


LPRMPT 


X'13' 


Preempt LCCW 


LRSTR 


X'43' 


Restore LCCW 


LEXEC 


X'FF' 


Special Control Operation 


LREAD 


B'10' 


Read Type LCCW 


LWRITE 


B'01' 


Write Type LCCW 


LCNTRL 


B'll" 


Control Type LCCW 


LRESET 


B'lon ■ 


Reset Commands 


LTIC 


X'08' 


Logical Tic 


LWR 


B'ooooor 


Write Conversational 


LW3 


B'000101' 


Write Block 


■.WM 


B'OOIOOT 


Write Message 


LWT 


B'oonor 


Write Transmission 


LEWM 


B'011001' 


Erase/Write Message 


LEWT 


B'omor 


Erase/Write Transmission 


LEAU 


B'oiooor 


Erase All Unprotected 


LRB 


B'ooono 1 


Read Block 


LRM 


B'001010' 


Read Message 


LRT 


B'oonio' 


Read Transmission 


LRMOD 


B'010010' 


Read Modified 


LRBUF 


B'010110' 


Read Buffer 


LRCONT 


B'011010' 


Read Continuous 


LRPEP 


B'oinio' 


Read Perpetual 


LCPYM 


B'101001' 


Copy Message 


LCPYT 


B'101101' 


Copy Transmission 


LD 


X'23' 


Disconnect 


LDEC 


X'33 1 


Disconnecr with End of Call 


LEOC 


X"53' 


End of Call Command 


LXEL 


X'OB' 


Reset Error Lock 


LXC 


X'lB' 


Reset Conditional 


LXI 


X'2B' 


Reset Immediate 


LC 


X'03' 


Contact 


LWPA 


X'FD' 


Write Positive Ack 


LMT 


B'll' 


Transmission Mode 


LMS 


B'OO' 


Special Mode like Conv, EAU 


LMB 


B'OT 


Block Mode 


LMM 


B'lO' 


Msg or Continuous Mode 



LCCW (ISTLCCW) ( Continued) 

Constants in ISTLCCW (Continued ) 

Following Equates for - Port Solicitor (Dial) 

Port Solicitor Command Codes 

Label Value Meaning 

PSOL X'FE' Special Port Solicitor Command 

STCTL X'Ol" Start Control 

RESTCTL X'02' Reset & Control - Redrive 

STIPITT X'03' Start Input 

Following Equates for SDLC Support 



LCCHOLD 


X'OT 


Hold 


LCCRHOLD 


X'02 1 


Release Hold 


LSEND 


X'Fl' 


Send 


LCLEAR 


X'F2' 


Clear 


LCRUD 


X'F3' 


Clear, Unbind 


LCRUDNFY 


X'F4' 


Clear, Unbind, Notify 


LNFY 


X'F5' 


Notify 


LRELCB 


X'F6" 


Release CB 


LRESTSR 


X'F7' 


Resetsr 


LCLRNFY 


X'F8' 


Clear/Notify 


LCHPUR 


X'F9' 


Purge 


LCCWSIZE 


8 


LCCW size 


LRDS 


X'FF" 


Record dev stats command 


LQUIS 


X'FE' 


Quiesce Command 



LCPB 


(ISTLCPB) 








Dec 


Hex 


4 
8 

C 
10 
14 
18 
1C 
20 

24 
28 





1 


2 


3 





LCPTYPE 
Type Code 


LCPLNGTH 
Length in 
Bytes 


LCPFLAGS 
Flag Byte 


LCPMNRCD 
LCP Minor 
Rejection Code 


4 


LCPCHAIN 
APS Chain 


8 


LCPRUCNT 
Number of RU 
for this LCPB 


LCPFLAG2 
Second Flag 
Byte 


LCPSEQ 
Outbound Sequence Number 


12 


LCPCID 
Communication ID' 


16 


LCPNXLCW 
ADDR Next LCCW 


20 


LCPFDBA 
BTU Address 


24 


LCPTLBAD 
Address of TLB 


28 


LCPFC 
Sequence Num 


SN 

ber First BU 


LCPFSNCH 
1st SEQ Number in Ru Chain 


32 


LCPRSV03 
Reserved 


LCPFLG1 
Flags 


LCPRRCCT 
Count of 
Responses 
Received 


LCPRRCNT 
Count of 
Responses 
Requested 


36 


LCPFLCCW 
Internal DOS TPIOS Pointer to First LCCW 


40 


LCPLCCW 
First LCCW 




Or 


g LCPCHAIN 




4 


4 


First Byte of 
LCPCHAIN 






Or 


g LCPCID 




12 


C 


LCPSA 
Source Ident 


F 
fication 


LCPDAF 
Destination Identification 



LCPB (ISTLCPB) (Continued) 





























Dec 


Hex 





1 


2 


3 








Or 


g LCPFLCCW 
















36 


24 






LCPUBFSB 
Unbind FSB Address 














Or 


g LCPLCCW 
















40 


28 






LCPRSTQA 














2C 






Reset LCPB Queue Header 










44 






LCPPABA 


















PAB Pointer 














Or 


g LCPPABA 
















44 


2C 






LCPRPHA 
RPH Pointer 














Or 


g LCPRPHA 
















44 


2C 


First Byte of 










LCPPABA and 


















LCPRPHA 


ST LCPB 












Alpha 


betical 


List of F 


ields in 




Field 


Dec 


Hex 


Field 


Dec 


Hex 


Field 


Dec 


Hex 


LCPCHAIN 0004 


0004 


LCPLCCW 


0040 


0028 


LCPRUCNT 


0008 


0008 


LCPCID 0012 


000C 


LCPLNGTH 


0001 


0001 


LCPSAF 


0012 


oooc 


LCPDAF 0014 


000E 


LCPMNRCD 


0003 


0003 


LCPSEQ 


0010 


000A 


LCPFDBA 0020 


0014 


LCPNXLCW 


0016 


0010 


LCPTLBAD 


0024 


0018 


LCPFLAGS 0002 


0002 


LCPPABA 


0044 


002C 


LCPTYPE 


0000 


0000 


LCPFLAG2 0009 


0009 


LCPRPHA 


0044 


002C 


LCPUBFSB 


0036 


0024 


LCPFLCCW 0036 


0024 


LCPRRCCT 


0034 


0022 








LCPFLG1 0033 


0021 


LCPRRCNT 


0035 


0023 








LCPFOSN 0028 


001C 


LCPRSTQA 


0040 


0028 








LCPFSNCH 0030 


001 E 


LCPRSV03 


0032 


0020 








Flag Meanings 
















Hex 








Bit 




Pattern 


Pattern 


Disp 


Flag Byte 


Conten 


s 


Pattern 




Name 


Mean 


ng 


0002 


LCPFLAGS 


Flag By 


te 


1... . 

.1.. . 




LCPLOGIC 
LCPCBLK 


LCP Logic Error 
LCP Control Block 
Error 
Free Block 










..1. . 




LCPFBIND 
















Indicator 










...1 . 




LCPRJECT 


LCPB 


Rejected 






















Flag 





LCPB (ISTLCPB) (Continued) 
Flag Meanings (Continued) 



Hex 

Disp Flag Byte 



0004 First Byte of 

LCPCHAiN 

0009 LCPFLAG2 Second Flag Byte 



First Byte of 
LCPPABA and 
LCPRPHA 
LCPFLG1 Flags 



Bit 


Pattern 


Pattern 


Pattern 


Name 


Meaning 


...1 .... 


LCPCRFLG 


Rejected Contact 
Request 


.... 1... 


LCPMDRST 


LCP has been reset 


1.. 


LCPRESET 


Reset Request LCP 


1. 


LCPDTRCE 


Device Trace 
Require 


1 


LCPREQOK 


Request Handled 
as NOOP, 
Completion O.K. 


1 


LCPCHNG 


Gate Bit 


1 


LCPPRFLG 


Pacing Required 


.1 


LCPASYN 


Asynchronous LCPB 


..1 


LCPRSTRT 


Restart LCPB 


...1 .... 


LCPTLBPI 


TPIOS Block LCCW 


....1... 


LCPFIDO 


FIDOTH 

Indicator for Record 


1.. 


LCPCPURG 


Request may cause 
Following Requests 
to be Purged 


1. 


LCPTPICB 


LCPB owned by 
TPIOS 


1 


LCPSPURG 


Request Subject 
to Purging due to 
Prior Exception 


1 


LCPFTYPE 


Feedback Type 


I 


LCPRSV04 


Reserved for 
Alignment 


.1 


LCPINTER 


Internal LCPB 


..1 


LCPREDRV 


LCPB is for 
Redrive 


...1.... 


LCPSTLB 


TLB not to be 
Freed 


.... 1... 


LCPDIRPT 


Direct Post 


Ill 


LCPRSV05 


Reserved 



LCPB (ISTLCPB) (Continued) 



Constants in 


ISTLCPB 


Label 


Value 


Constants for LCPTYPE 


LCRPHFT 


BT 


LCPABFT 


B'O' 


LCPBFIRM 


X'10' 


LCPBTERM 


X'll' 


LCTYPE 


X'04' 


LCPCLACB 


X'04* 


PLCPTYPE 


X'28' 


LCPETYPE 


X'40' 


Minor Return Codes 


LCMCRSTR 


X'F7' 


LCPMNEW 


X'02' 


LCPMNPF 


X'03' 


LCPMNAS 


X'04' 


LCPMNCL 


X'06' 


LCPMNVD 


X'07' 


LCPMNTF 


X'10' 


LCPMNSF 


X'OT 


LCPMNTS 


x'ir 


LCPMNAP 


X'OA' 


LCPMNPR 


X'OB' 


LCPMNRE 


X'OC 



LU Failed, CLSDST, Sched Lost Term, OPNDST may 

be tried 

Term Received, CLSDST, Sched Lost Term 

LCPB from Close ACB 
Purge LCPB Type ID 
Extended LCPB Type ID 



Minor RC for Resetsr 

Early Warning, Recovery in Progre 

Perm. I/O Failure 

Auto Network Shutdown 

Close/CLSDST Occured 

Vary Deactivate 

Temp Record Device Failure 

Temp Basic Failure 

Terminate Self 

Appl. Issued Clear 

Preempt 

Restore 



NCB (1STNCB) 
Dec Hex 



20 14 

24 18 

28 1C 

32 20 

36 24 



NCBTYPE 
Control block 
type code 



NCBLNGTH 
Length in bytes 



NCBDAF 
ID of destination 



NCBRDTE 
Address of RDT entry 



NCBTSKID 
Task ID 



NCBNSNA 
Address of next schedulable node 



NCBFMCBA 
Address of first FMCB 



NCBNCBA 

CID of next same/lower 

level node 



NCBNCSL 
CID of next same/level 
node 



NCBFLAGS 
Common NCB flags 



NCBRVPT1 
Count of last trace records 



NCBLTRC 
Lost trace record count 



NCBFMCBP 
Address of port solicitor FMCB 



NCBDEVCH 
Node Dev Char 



NCBSWDAF 
Real Network Address of 
Term in SW. Subarea 



NCBRSV01 
Reserved 



Org NCBFLAGS 



NCBCSTAT 
Connection 
status flag 


NCBFRAS 
RAS flag 



NCBFTRIO 

l-O trace active 

this node 



Org NCBFTRIO 



NCBFLTIO 

l-O trace active 

this node 



NCB (ISTNCB) (Continued) 



Org NCBFLAGS + 2 



OrgNCBFLAGS+3 



NCBFIAG1 
NCB flags 



NCBNMLLN 
Number of lower 
level nodes 



Alphabetical List of Fields in ISTNCB 



Field 


Dec 


Hex 


Field 


Dec 


Hex Field 


Dec 


Hex 


NCBCSTAT 


0024 


0018 


NCBFRAS 


0025 


0019 NCBRDTE 


0004 


0004 


NCBDAF 


0002 


0002 


NCBFTRIO 


0025 


0019 NCBRSV01 0046 


002 E 


NCBDEVCH 


0036 


0024 


NCBLNGTF 


0001 


0001 NCBRVPT1 0028 


001C 


NCBFLAGS 


0024 


0018 


NCBLTRC 


0030 


00 IE NCBSWDAF 0044 


002C 


NCBFLAG1 


0026 


001A 


NCBNCBA 


0020 


0014 NCBTSKID 0008 


0008 


NCBFLTIO 


0025 


0019 


NCBNCSL 


0022 


0016 NCBTYPE 


0000 


0000 


NCBFMCBA 


0016 


0010 


NCBNMLLN 0027 


001B 






NCBFMCBP 


0032 


0020 


NCBNSNA 


0012 


oooc 






Flag Meanings 
















Hex 








Bit 


Pattern 


Pattern 




Disp Flag By 


e 


Contents 




Pattern 


Name 


Meaning 




001A NCBFLAG1 


NCB Flags 


1 


NCBSNAI 


Old Node 












.1.. .. 


NCBCCNE 


Node Sick Flag 










..1. .. 
...1 .. 
.... 1. 


NCBRSTRT 
.. @NM00001 
NCBTTF 


Recovery in Progress 

Reserved 

C/B Ignore Trickle 

Traffic l=Yes 










11. @NM00002 

1 @NM00003 


Reserved 
Used for DOS 



Constants in ISTNCB 



Label 


Value 


Meaning 


LDTYPE 


X'07' 


Type Code for LDNCB 


ICTYPE 


X'06 1 


Type Code for ICNCB 


DNTYPE 


X'05' 


Type Code for DNCB 


HCTYPE 


X'14' 


HCNCB Type 


CCTYPE 


X'15 1 


CCNCB Type Code 


LUTYPE 


X'25' 


LUNCB Type Code 


NCNOTRC 





No Trace Required 



NCSPL (ISTNCSPL) 
Dec Hex 




NCSPLSID 
DOS=X'00' 
(Console ID) 



NCSPLWL 
Command Flags 



NCSPFX 
Queue Element Prefix 



NCSPLVCD 
Verb Code 



NCSPLVF1 
Special Proc 
Flags 



N CS PL VBF 
Verb Modifier Flags 



NCSPRMRC 
Purge Minor 
Return Code 
Field 



NCSIORC 
I/O or Restart 
Return Code 



NCSPRRNPT 
Addr RN Entry for Line Trace 



NCSPLRID 
ID = 'Nodename' 



NCSPLLID 
Logon = 'Nodename' 



NCSDLID 
Offhook ID 



NCSRSV03 
Reserved 



NCSPLRPT 
ID = 'Nodename' RDTE Address 



NCSPL (1STNCSPL) (Continued) 



NCSPLLPT 
Logon/Logoff = 'Nodename' RDTE Addr 



NCSPLCMD 
3705 Control Command Codes 



NCSNCPEP 
EP Subchannel 
Addr 



NCSMSGSP 
Reserved for 
Message 
Surpression 



NCSPLUAD 
U = 'Unit Address' 



@NM0001 1 
Reserved 



NCSPLWRE 
WTOR ECB 



NCSPLWRF 
WTOR Reply Area 



NCSPLRAD 
RDTE PTR for Allocate/Deallocate 



NCSIOC1D 
Current CID for DAF Lock Held 



NCSPLWKA 
NCS Work Area Address 



NCSPLCVT 
Pointer to VTAM CVT 



NCSPLRPH 
Pointer to RPH 



NCSPL (ISTNCSPL) (Continued) 



Dec Hex 
164 A4 



NCSPLFL1 
Vary F lags 



NCSDLRSN 
Dial Reason 
Codes 



NCSPLECB 
ECB for Vary PGS 



NCSPLFSB 
Address of USS-FSS FSB or RU 



NCSPLRCR 
Address RDTE for CR 



NCSPLFL2 
Vary Flags 



NCSPLFL5 
Flag Byte 



NCSPLFL3 
Flag Byte 



NCSPLFL4 
Flag byte 



NCSPLOLN 
Length O/B RU 



NCSPLP1 
Addr Vary PAB 



NCSPLP2 
Addr D/L/R PAB 



NCSPLP3 
Addr ERP PAB 



NCSPLSPL 
Addr Assoc. NCSPL 



NCSPLWEL 
Addr Post RPH 



NCSPLRRP 
Addr Remote RN RDTE in Local RDT 



NCSPLRUO 
Addr O/B RU 



NCSPL (ISTNCSPL) (Continued) 



Dec Hex 
212 D4 



NCSPLRUI 
Addr Buffer for l/B RU 



NCSPLAPP 
Addr NCSPL Appendage 



NCSRNAME 
Rname=from Vary Activate 



NCSPLSQN 
Sequence=Nr. for Response 



NCSPLGID 
Binary Rep of 
GID Value 



NCSPLMID 
Logmode = 'Modename' 



NCSPLNSN 
RDTENSNEAat CLSDST 



NCSSENSE 
Sense 



NCSCPWPT 
Address of CPWA 



NCSMGLPT 
PTR to USS/FSS MSG Param List 



NCSUFMCB 
Pointer to SSCP-LU FMCB 



NCSPLRH 
Request RH 



NCSPLPID 
Binary Rep of 
PID Value 



NCSPLRTY 
Type from 
RTGOH RU 



NCSPL (ISTNCSPL) (Continued) 



12 3 



First Byte of 
NCSPLVBF 



Org NCSPLVBF+1 



Second Byte of 
NCSPLVBF 



Org NCSPLCMD 



NCSCMDA 
RH Flags 



Org NCSPLCMD+1 



NCSCMBD 
Command Field 



NCSLSCMD 
Line Sched 
Command Type 



NCSPLRCD 
Hex Value for 
Line Sched Param 



OrgNCSIOCID 





NCSPLCID 
Alias for Above 


c 


)rg NCSPLCID 




NCSPLSAF 
Source Address 


NCSPLDAF 
Destination Address 


C 


rg NCSSENSE 




NCSSNS1 
Sense Data 
Major Code 


NCSSNS2 
Sense Modifier 
Byte 


NCSSENS2 
User Sense Data. 



NCSPL (1STNCSPL) (Continued) 
Alphabetical List of Fields in 1STNCSPL 






















@NM00011 


0067 


0043 


NCSPLFSB 


0168 


00A8 


NCSPLSPL 


0196 


0004 


NCSCMDA 


0060 


003C 


NCSPLGID 


0230 


00E6 


NCSPLSQN 


0228 


00 E4 


NCSCMDB 


0061 


003D 


NCSPLLID 


0036 


0024 


NCSPLUAD 


0064 


0040 


NCSCPWPT 


0248 


00F8 


NCSPLLPT 


0056 


0038 


NCSPLVBF 


0018 


0012 


NCSDLID 


0044 


002C 


NCSPLMID 


0232 


00 E8 


NCSPLVCD 


0017 


0011 


NCSDLRSN 


0180 


00 B4 


NCSPLNSN 


0240 


00F0 


NCSPLVFL 


0020 


0014 


NCSIOCID 


0148 


0094 


NCSPLOLN 


0182 


00B6 


NCSPLVF1 


0021 


0015 


NCSIORC 


0023 


0017 


NCSPLPID 


0231 


00E7 


NCSPLWEL 


0200 


00C8 


NCSLSCMD 


0144 


0090 


NCSPLP1 


0184 


00 B8 


NCSPLWKA 


0152 


0098 


NCSMGLPT 


0252 


00FC 


NCSPLP2 


0188 


00BC 


NCSPLWRE 


0068 


0044 


NCSMSGSP 


0063 


003F 


NCSPLP3 


0192 


OOCO 


NCSPLWRF 


0072 


0048 


NCSNCPEP 


0062 


003E 


NCSPLRAD 


0144 


0090 


NCSPRMRC 


0022 


0016 


NCSPFX 


0000 


0000 


NCSPLRCD 


0145 


0091 


NCSRNAME 


0220 


OODC 


NCSPLAPP 


0216 


00D8 


NCSPLRCR 


0172 


OOAC 


NCSRRNPT 


0024 


0018 


NCSPLCID 


0148 


0094 


NCSPLRH 


0260 


0104 


NCSRSV03 


0050 


0032 


NCSPLCMD 


0060 


003C 


NCSPLRID 


0028 


001C 


NCSSENSE 


0244 


00F4 


NCSPLCVT 


0156 


009C 


NCSPLRPH 


0160 


00A0 


NC5SENS2 


0246 


OOF 6 


NCSPLDAF 


0150 


0096 


NCSPLRPT 


0052 


0034 


NCSSNS1 


0244 


00F4 


NCSPLECB 


0164 


00A4 


NCSPLRRP 


0204 


OOCC 


NCSSNS2 


0245 


OOF 5 


NCSPLFL1 


0176 


00 BO 


NCSPLRTY 


0263 


0107 


NCSUFMCB 


0256 


0100 


NCSPLFL2 


0177 


00B1 


NCSPLRUI 


0212 


00D4 








NCSPLFL3 


0178 


00 B2 


NCSPLRUO 


0208 


00D0 








NCSPLFL4 


0179 


00 B3 


NCSPLSAF 


0148 


0094 








NCSPLFL5 


0181 


00B5 


NCSPLSID 


0016 


0010 









Hex 

Disp Flag Byte 



00B1 NCSPLFL2 Vary Flags 



Pattern 


Pattern 


Name 


Meaning 


NCSPL2IN 


Second Entry 


NCSPLSOM 


Supress Op. Message 


NCSPLEBN 


Entry from BNN SSCP 


NCSPLREQ 


NCSPL from Restore 


NCSPLNON 


Do hot Addr RDT 




Segment 


NCSPLAPU 


Activate Physical 




Done by Load 


NCSPL2CN 


Second Contact 




Request 


NCSPLPOS 


BNN Posted 


NCSPLVDP 


NCSPL on Vardef PAB 


NCSPLRSF 


No Sick Clear before 




I/O 


NCSPLRIO 


I/O = Restart l/O 


NCSOUFMC 


Purge Only User FMCB 


NCSPLDS 


1=C10 Saved 




Response Data 


NCSREMPO 


Remote Power Off 




Spec by Oper 



ZSPL (ISTNCSPL) (Continued) 
ag Meanings (Continued) 



sp Flag Byte Contents 



0B2 NCSPLFL3 Flag Byte 



)0B3 NCSPLFL4 Flag Byte 



0B5 NCSPLFL5 Flag Byte 



First Byte of 
NCSPLVBF 



Second Byte of 
NCSPLVBF 



Bit Pattern 


Pattern 


Pattern Name 


Meaning 


1. NCSPLVIS 


Vary IMM Start 




Caller of CVP 


.... ...1 NCSPLVIT 


Vary IMM Term 




Caller of CVP 


1 NCSPLMOM 


ERP Caused by 




Failure of Higher Nod< 


.1 NCSEPP 


1=EP Subchannel 




Present 


..1 NCSPLANS 


On for Act in Answer 




Mode Off for Act in 




Non -Answer Mode 


...1 .... NCSGID 


On for Path with GID 




Parm 


.... 1... NCSPID 


On for Path with PID 




Parm 


1.. NCSANS 


On for Activate with 




ANS Parm 


1. NCSFINAL 


Final Parm Exists 


1 NCSEND 


End Parm Exists 


1 NCSDLNID 


ID Present in 




NCSPL - Off 


.1 NCSPLRSO 


Reset Only 


..1 NCSPLVID 


Orig CMD was 




Modify Dump 


...1 .... NCSDSPE 


Display Every 


.... 1... NCSDSPA 


Display Act 


1.. NCSDSPI 


Display Inact 


1. NCSDSPN 


Display None 


1 NCSPL2AP 


Second ACTPU to 




320X 


1 NCSSCPPS 


SSCP Work Area in 




PVT Storage 


.1 NCSSDLK 


On-SDLC Link 




Processed 


..11 1111 @NM00012 


Reserved 


1 NCSVBF01 


Unused 


.1 NCSVBF02 


Unused 


..1 NCSVBF03 


Modify MSG Sup 


...1 .... NCSVBF04 


Type=VTAM 


.... 1... NCSVBF05 


Linetrace=l 


1.. NCSVBF06 


I/O Trace=l 


1. NCSVBF07 


Buffer Trace=l 


1 NCSVBF08 


Modify Tprint 


1 NCSVBF09 


Modify Test 


.1 NCSVBF10 


Modify Trace=No 


..1 NCSVBF11 


Vary Internal Only & 




Modify Trace = Yes 



NCSPL (ISTNCSPL) (Continued) 
Flag Meanings (Continued) 



Hex 

Disp Flag B 



0014 NCSPLVFL Command Flags 



0015 NCSPLVF1 Special Proc Flat 

003C NCSCMDA RH Flags 



Bit 


Paftern 


Pattern 


Pattern 


Name 


Meaning 


...1 .. 


NCSVBF12 


Vary Immediate & 
Modify Netsol=No 


.... 1. 


NCSVBF13 


Modify Netsol=Yes 


1 


NCSVBF14 


Vary Logon & 
Modify Change 




1. NCSVBF15 


Vary Deactivate & 
Vary Normal Close 
(ERP) 




.1 NCSVBF16 


Vary Activate & ERP 
Request & Modify 


1 


.. NCSVNCSA 


NCSPL is Active 


.1.. .. 


NCSVDEL 


Delete NCSPL 




. . NCSVSTAT 


Indicate NCSPL was 
not Getmained 


...1 .. 


NCSDCONT 


Do Disconact 


.... 1. 


NCSABCON 


Do Abandon 
Connection 




NCSDACLK 


Do Activate Line 




11 NCSRSV02 


Reserved 


1 


NCSOVFMC 


Purge only Vary's 
FMCD 


1 


NCSPLSYS 


On-System Off-FM 


.1.. .. 


NCSPLCTL 


On-Control Off -Data 




NCSPLSYN 


On=Synchr Off- 


...1 .. 


NCSPLFLO 


On-withFlow 
Off-against Flow 


.... 1. 


NCSPLUFM 


On=Unformatted 
RU, Off=Formatted 


Ill (3NM00010 


Reserved 



NCSPL (NCSAPP) 



Dec Hex 




72 48 

76 AC 



ORG NCSAppuE 



NCSAPSA 
Save area 



NCSAPECB 
ECB 



NCSAPTXT 
Dump data 



NCSAPEND 
High storage address 



NCSAPPAB 
BNN vary PAB address only 



NCSRSV04 
Reserved 



NCSAPRU 
IPL CMD RU prefix 



NCSAPDAT 
Resp for dump, O/B load 



Alphabetical List of Fields in NCSAPP 
Field Dec Hex Field 



NCSAPBUE 0088 0058 
NCSAPDAT 0096 0060 
NCSAPECB 0072 0043 



NCSAPEND 0084 0054 
NCSAPPAB 0608 0260 
NCSAPRU 0091 005B 



NCSAPSA 0000 0000 
NCSAPTXT 0076 004C 
NCSRSV04 0088 0058 



NCSPL (NCSUSSRU) 
Dec Hex 




| , 


2 


3 


NCSRULEN 
Length of RU 




NCSRUITS 
Start of RU (Variable Length) 





Alphabetical List of Fields in NCSUSSRU 
Field Dec Hex Field Dec Hex 

NCSRUITS 0002 0002 NCSRULEN 0000 0000 

Constants in ISTNCSPL 



Label 


Value 


Meaning 


General Constants 




NCSWASZ 


2032 


NCSPL Work Area Size 


NCSRTGOH 


X'1000' 


VBF Value for Internal Command-RTGOH RECVD 


NCSPLVC0 


X'00' 


Error 


NCSPLVC1 


X'OT 


Vary 


NCSPLVC2 


X'02" 


Modify 


NCSPLVC3 


X'03' 


ERP 


NCSPLVC4 


X'04' 


Display 


NCSPLVC5 


X'05" 


Status to SM 


NCSPLVC6 


X'06' 


Internal CMD 


NCSPLVC7 


X'07' 


In it/Term Tusm 


NCSPLVC8 


X'08' 


Dial 


Constants for 


Vary Command Modifiers 


NCSVACT 


X'OOOT 


Activate 


NCSVDEA 


X'0002' 


Deactivate 


NCSVLON 


X'0004' 


Logon 


NCSWPP 


X'0080' 


Vary Normal Cleanup Reqst 


NCSVIMM 


X'0010' 


Immediate 


NCSVINT 


X'0020' 


Internal Only 


NCSVALO 


X'0005' 


Activate with Logon 


NCSVDEI 


X'0012' 


Deactivate Immediate 


NCSVDII 


X'0032' 


Deactivate Immediate Internal Only 


NCSCNOTF 


X'FFF8' 


Notify Request 


NCSVANON 


X'0008' 


Answer = On 


NCSVANOF 


X'0040' 


Answer =Off 


NCSVPUSE 


X'0100' 


Path = Usable 


NCSVPNUS 


X'0200' 


Path = Not Usable 


NCSVINOP 


X'0400' 


Inoperative 



NCSPL (ISTNCSPL) (Continued) 
Constants in 1STNCSPL (Continued) 
Label Value Meaning 

Constants for Modify Command Modifiers 



NCSMDUM 


X'0001' 


Dump 3705 


NCSMCHA 


X'0004' 


Change 


NCSMNSY 


X'0008' 


Netsol = Yes 


NCSMNSN 


X'0010' 


Netsol = No 


NCSMTRY 


X'0020' 


Trace = Yes 


NCSMVTRY 


X'1020' 




NCSMVTRN 


X'1040' 




NCSMTRN 


X'0040' 


Trace = No 


NCSMTPR 


X'0100' 


Trace Print 


NCSMTST 


X'0080' 


Modify Test 


NCSDPF 


X'0000' 


Potential Fail 


NCSDSTRT 


X'0001' 


Dial Start 


NCSDOH1 


X'0002' 


Offhook 1 


NCSDOH2 


X'0004' 


OfFhook 2 


NCSDDF 


X'0010' 


Dial Failed 


NCSDLKS 


X'0008' 


Link Start 


NCSDLKC 


X'0020' 


Link Completion 


NCSDHU 


X'0040' 


Hangup 


NCSDLK 


X'0080' 


Deallocate 


NCSDGIVE 


X'0100' 


Give 


NCSDINOP 


X'0200' 


Inop 


NCSDLRST 


X'0400' 


Recovery SW Links after RN Failure 


NCSEERRA 


X'0001' 


ERP Request 


NCSECLOR 


X'0002' 


Vary Normal Close Request 


NCSEDACT 


X'0004' 


ERP Deactivate Request 


NCSERSTR 


X'0008" 


RSTRT Entry from DLR Proc 


Purge Minor Return Codes Constants 


NCSAPABN 


X'05' 


Application Abend 


NCSCLDST 


X'06' 


Close Dest Occured 


NCSDDISC 


X'08' 


Dial Disconnect Occured - Conn no Longer Available 


NCSBTHEX 


X'09' 


Buffer Threshold Exceeded 


I/O or Restart Return Codes 


Constants 


NCSIOSUC 


X'OO' 


I/O Successful 


NCSIOERR 


X'04' 


I/O Error 


NCSIOPRG 


X'08' 


I/O Purged 


NCSRSSUC 


X'OO' 


Restart Successful 


NCSRSERR 


X'04' 


Restart Error 


NCSVAIPL 


X'OO' 


IPL No Restart on Vary Actv 


NCSVANRA 


X'10' 


IPL Successful, no Restart Available on Vary Active 


NCSVAWA/F 


X'08' 


Warm Start Failure for Vary Activate 


NCSVAIPF 


X'OC 


IPL Failed on Vary Activate 


NCSDSIA 


X'14' 


Invalid Address Specified on Display Storage Cmnd 


NCSVAISZ 


X'08' 


NCP Size too Large 


NCSIPLSC 


X'OO' 


IPL Successful 


NCSIOER 


X'OC 


I/O Error on Remote IPL 



NCSPL (ISTNCSPL) (Continued) 



Constants In 


ISTNCSPL (Contit 


1Ue d) 


Label 


Value 


Meaning 


NCSNCPAC 


X'04' 


Remote NCP Already Active 


NCSNCRPF 


X'70' 


Remote Power Off 


Constants for 3600 Support 




NCSES 


X'OOOT 


End Session 


NCSBF 


X'0002' 


Bind Failure 


NCSUF 


X'0004' 


Unbind Failure 


NCSINIT 


x'ooor 




NCSTERM 


X'0002' 




NCSTPPST 


X'0001' 


TPPST Command 


NCSII 


X'0002' 


IPL In it Command 


NCSIT 


X'0004' 


IPL Command 


NCSIF 


X'0008' 


IPL Final Command 


NCSDI 


X'0010' 


Dump Init Command 


NCSDT 


X'0020' 


Dump Text Command 


NCSDF 


X'0040" 


Dump Final Command 


NCSCON 


X'0080' 


Contact Command 


NCSDICON 


X'0100' 


Discontact Command 


NCSMSFMD 


X'0200' 


Send FMD 


NCSSEND 


X'0400' 


Send 


NCSPURGE 


X'0800' 


PAB Purge 


NCSMSSUP 


X'2000' 


Constants for MSG Sup 


NCSCRDS 


X'3023' 


Record Dev Stats Command 


NCSCQUIS 


X'FOIA' 


Quiesce Command 


NCSSNUSS 


X'381F* 


Send USS Message 


NCSNC 


X'04' 


Not Contacted 


NCSLD 


X'OO' 


Contacted Loaded 


NCSNLD 


X'OC 


Contacted Needs Load 


NCSNCD 


X'08' 


Not Contacted Due to Deact 


NCSNCE 


X'10' 


Not Contacted Due to ERP 


NCSNFME 


X'24' 


Negative FME 



Constants for IORC for Display Storage 



NCSDSDEA X'OC' 

NCSDSFAL X'04' 



Prior Deact 

Fail Other than Prior Deact 



Type Codes for Configuration Restart 



NCSCTRLM 
NCSCNPOL 
NCSCSESS 
NCSCPOLL 



X'OT 
X'02' 
X'03' 
X'04' 



FM Data Command Codes 



NCSAPU 

NCSCDPU 

NCSCALU 

NCSCDLU 

NCSCSDT 



X'DOOT 
X'D002" 
X'D003' 
X'D004' 
X'D005' 



Change Dev Trans Limit 
Change Neg Poll Resp Limit 
Change Session Limit 
Change Line Serv Seek Pause 



Act Phys 
Deact Phys 
Act Log 
Deact Log 
SDT 



NCSPL (ISTNCSPL) (Continued) 



Constants in ISTNCSPL (Continued) 


Label 


Value 


Meaning 


NCSCFME 


X'2006' 


Send Pos Resp 


NCSCEXCP 


X'2007' 


Send Neg Resp 


NCSCCON 


X'3008' 


Contact 


NCSCDCON 


X'3009' 


Discontact 


NCSCIPLI 


X'300A' 


IPL Init 


NCSCIPLT 


X'300B' 


IPL 


NCSCIPLF 


X'SOOC 


IPL Final 


NCSCDUMI 


X'300D' 


Dump Init 


NCSCDUMP 


X'300E' 


Dump 


NCSCDUMF 


X'300F' 


Dump Final 


NCSCACTL 


X'3010' 


Act Link 


NCSCDACL 


X'301T 


Deact Link 


NCSCSSV 


X'3012' 


Set State Vector 


NCSCNSP 


X'3013' 


NS Proc Error 


NCSCSTD 


X'3019' 


Set Time & Date 


NCSCSEP 


X'9014' 


Switch to EP 


NCSCSNC 


X'9015' 


Switch to NCP 


NCSCLSD 


X'3016' 


Line Sched Parm 


NCSCDS 


X'3017' 


Display Storage 


NCSCPWO 


X'3018" 


Remote Power Off 


NCSSNFMD 


X'301C 


Send FMD 


NCSCDIAL 


X'301A' 


Dial 


NCSCADIL 


X'301B' 


Abandon Dial 


NCSCEANS 


X'SOID 1 


Enable Ans Mode 


NCSCAANS 


X'301E' 


Abandon Ans Mode 


NCSCANA 


X'SOIF 1 


Assign Net Address 


NCSCFNA 


X'3020" 


Free Net Address 


NCSCACON 


X'3021' 


Abandon Connection 


NCSCSCV 


X'3022' 


Set Control Vector 


NCSCNCPPG 


X'FFFF' 


Purge 


New Values for NCSPLCMD 




NCSCLCND 


X'0041' 


Load Conditionally 


NCSCUCND 


X'0042' 


Load Unconditionally 


NCSCRSRT 


X'0043' 


Restart 370X or CIus 


NCSDUCMD 


X'0044' 


Dump 370X 


NCSCERPP 


X'0045' 


Perform ERP Dump and Reload of 370X 


NCSDOUT 


X'0046' 


Dial Out 


NCSDCNT 


X'0047' 


Dial Contact 


NCSDABDN 


X'0048' 


Dial Abandon 


NCSDENAS 


X'0049' 


Dial Enable Answer 



Values for NCSCMDB 

NCSBFME X'06" 

NCSBEXC X'07' 

Constants for Dial Reason Codes 



Send POS Resp Command 
Send Neg Resp Command 



NCSDIRRD X'Or 

NCSDLRQT X'02' 



Redial 
Quit 



NCSPL (ISTNCSPL) (Continued) 



Constants in 1STNCSPL (Contir 



Now Values for NCSIORC 



NCSLDAOK 


X'OO' 


NCSLDACT 


X'04' 


NCSLDCAN 


X'04' 


NCSLDIOP 


X'08' 


NCSLDNOG 


X'OC 


NCSDUCOM 


X'14' 


NCSHALTD 


X'18' 


NCSUNREC 


X'lC 


NCSNOSTG 


X'20' 


NCSDOS 


X'OO' 


NCSDOF 


X'04' 


NCSDOP 


X'08' 


NCSDCS 


X'OO' 


NCSDCF 


X'OC 


NCSDAS 


X'OO" 


NCSDENSO 


X'OO 1 


NCSDOFHR 


X'04' 


NCSDENSF 


X'08" 


New values for 


NCSPRM 


NCSFIRM 


X'lO' 


NCSEWRN 


X'lT 


Constants for Trace 


NCSACTLT 


X'0820' 


NCSDACLT 


X'0840' 


NCSCACLT 


X'301D' 


NCSCDCLT 


X'301E' 



Jed) 
Meaning 



Command Processed Success 
NCP Active-Load not Perf 
Reload Declined by Oper 
I/O Purged 
Command Failed 
Dump Complete 
CMD Rejected, Halt in Prog 
Command Unrecognized 
CMD Rejected, Insuff Storage 
Dial-Out Successful 
Dial-Out Unsuccessful 
Dial-Out Pending 
Dial-Contact Loaded 
Dial-Contact Failed 
Dial-Abandon Conn Complete 
Enable Answer Successful 
Offhook Required 
Enable Answer Fail 



Restart Successful Opendst Req 
Con Lost, Recov in Prog 



Activate Line Trace 
Deactivate Line Trace 
SSCP Act Line Trace 
SSCP Deact Line Trace 



Display Command Modifier Constants 
NCSDPATH X'OOOT Paths 



Dec 


Hex 






1 


2 


3 

















PABWQCHN 
CPS SWAP Field for NEQ&CHN 




8 


8 
C 


PABOFFST 
Offset from 
Control Block 


PABDVTA 
DVT Address 


12 


PABRPHFG 
Sched Flags and RPH " 



Org PABWQCHN 



PABWEQA 
Work Element Queue Address 



Org PABWEQA 



First Byte of 
PABWEQA 



Org PABWEQA+1 



PABWEQP 
WKEL PTR 



Org PABWQCHN+4 



PABCHAIN 
APS Chain 



First Byte of 
PABCHAIN 



Org PABCHAIN+1 



PABCHNGP 
PSS Chain PTR 



5 (ISTPAB) (Continued) 



Dec Hex 

















1 2 1 3 








Org PABRPHFG 












12 C 


PABFLAGS 
Scheduling 
Flags 










Org PABRPHFG 


fl 








13 D 


PABRPHA 
RPL Header Address 






Alphabetical List of Fields " 

Field Dec Hex 

PABCHAIN 0004 0004 
PABCHNGP 0005 0005 


n ISTPAB 

Field 

PABOFFST 
PABRPHA 


Dec Hex Field 

0008 0008 PABWEQP 
0013 000D PABWQCHN 


Dec 

0001 
0000 


Hex 

0001 
0000 



PABDVTA 0009 0009 PABRPHFG 0012 000C 
PABFLAGS 0012 000C PABWEQA 0000 0000 



Hex 






Bit 




Pattern 


Pattern 


D]sp_ 


Flag Byte 


Contents 


Pattern 


Name 


Meaning 


CCOC 


PABFLAGS 


Scheduling Flags 


1... 

.1.. 
..1. 

...1 


1... 
.1.. 
.1.. 
.1.. 
..1. 

...1 


PABAPYP 

PABPRIOR 
PABNORPR 

PABDYNAM 

PABSSN 

PABERLCK 

PABERRLK 

PABERLOK 

PABINHBT 

PABNODQ 


Application is a 
User Exit 

Immediate Priority 
Normal Priority - 
Reschedualable 
Dynamic 
System Services 
PAB Error Lock Flag 
Error Lock 
Error Lock 
l=lnhibit 
Traffic, 0=No 
Do not DEQWork 
Element 


0000 




First Byte cf 


1... 




PABWEQG 


Gating Bit 






PABWEQA 


.111 


1111 


PABRSV01 


Reserved 


0004 




First Byte of 
PABCHAIN 


.1.. 
..1. 
...1 


1... 
.111 


PABCHNG 
PABRESCH 

PABCDP 

PABUNCON 

PABRESET 
PABRSV02 


Gating Bit 

Reschedule PAB at 

TPEXIT 

Close DST/Change 

in Progress 

Unconditionally 

Reschedule PAB at 

TPEXIT 

Reset Issued on this 

PAB 

Reserved 



PAB (ISTPAB) (Continued) 
Constants in ISTPAB 



Label 

PABWEQGO 

PABWEQG1 

PABCHNGO 

PABCHNG1 

PABRESCO 

PABRESC1 

PABCDPO 

PABCDP1 

PABERLKO 

PABERLK1 

PABUNCOO 

PABUNCOl 

PABPRIRO 

PABPRIR1 

PABRSTO 

PABRST1 



Value 

X'7FFFFFFF' 
X'80000000' 
X'7FFFFFFF' 
X'80000000' 
X'BFFFFFFF' 
X '40000000' 
X'DFFFFFFF' 
X '20000000' 
X'FBFFFFFF' 
X '04000000' 
X'EFFFFFFF' 
X' 10000000' 
X'BFFFFFFF' 
X '40000000' 
XT7FFFFFF' 
X '08000000' 



Meaning 

Turn PABWEQG Off 
Turn PABWEQG On 
Turn PABCHNG Off 
Turn PABCHNG On 
Turn PABRESCH Off 
Turn PABRESCH On 
Turn PA BCD P Off 
Turn PABCDP On 
Turn PABERRLK On 
Turn PABERRLK Off 
Turn PABUNCON Off 
Turn PABUNCON On 
Turn PAB Prior Off 
Turn PAB Prior On 
Turn PABRESET Off 
Turn PABRESET On 





He 


4 
8 
C 
9 
and 












Dec 







1 


2 


3 





PIBFLG 
F lag byte 


PIBCNCL 
Cancel code 


PIBLOGID 
SYSLOG indentifier 


4 


PIBDATFL 
Flags for VM 
support 


P IB SAVE 
Address of SAVE area 


8 


PIBNOC 
Number of . 
core blocks 


PIBORP 
Origin of partition 


12 


PIBASS 
Assign flags 


PIBLU3ID 
User lub index 


PIBLUBND 
Nbr of user lubs 


PIBFLG2 
More flags 




OR 


G PIBORP 




9 


nasks 


PIBOSAVE 
For Attn rtn, PTR to user save area 


Flags 









4(4) PIBDATFL Flags for > 

0(0) PIBFLG Flag byte 



15(0F) PIBFLG2 



PIBTRAM 


X'80 


Partition in virtual mode 


@NM00007 


X'7F 


Reserved 


(3NM00006 


X'FE 


Not used 


PIBIOCMP 


X'01 


I/O completion 


PIBFLG20 


X'80 


Reserved 


PIBFLG21 


X'40 


Reserved 


PIBFLG22 


X'20 


Reserved 


PIBFLG23 


X'10 


Reserved 


PIBFEOJ 


X"08 


Fetch EOJ 


PIBTASK 


X'04 


Cancel task 


PIBFLG26 


X'02 


Reserved 


PIBFLG27 


X'01 


Reserved 



Constants in ISTPIB 



PIBVFORC X'40' 

PIBVSNOC X'4T 



VTAM sympathetic forced cancel 
Cancel due to VTAM should-not-o 



VTAM cancel should-not-occur function codes 
I denotes SNO in inbound code 
O denotes SNO in outbound code 
PIB denotes DOSAS TPIOS module 
The hex value of the code is structured 



11-127 



PIB (ISTP1B ) (continued) 

Constants (continued) 

Label Value Meaning 

Where BIT- represents = inbound, 1 = outbound 
BIT - 1 represents =TPIOS, 1 = non-TPIOS 
BITS 2 -3 00=DOS/VS 
01 =VS/1 
10=VS/2 
1 1 = Common 
BITS 4 - 15 = Function code value 
PIEI1242 X'04DA' RTN code GT from rest 



ISTPICCA 


PIEI2010 


X'Q7DA' 


PIEI2015 


X'07DF" 


PIE 12020 


X'07E4' 


PIE 12025 


X'07E9' 


PIEI2030 


X'07EE' 


PIEI2035 


X'07F3' 


PIE 12040 


X'07F8' 


PIE 12045 


X'07FD' 


PIEI2050 


X'0802' 


PIE 12060 


X'080C 


PIEI2070 


X'0816' 


PIEI2080 


X'0820' 


PIEI2090 


X'082A' 



RC>0CIDCTLfind 
RC>0CIDCTL finish 
RC>0CIDCTLfind 
RO0CIDCTL finish 
RC>0 Relstore 
RC>0CIDCTL finish 
RC>0 relstore 
RC>0C!DCTL finish 
RC>0CIDCTLfind 
RC>0 relstore 
RC>0CIDaLfind 
Work element invalid 
RC>8 reqstore 



ISTPICCF 
PIEI0230 X'00E6' 

ISTPICCI 
PIEI3510 X'0DB6' 

ISTPICCO 
PIEO0020 X'8014 1 

PIEO0030 X'801E' 

PIEO0040 X'8028' 

P1EO0050 C'8032' 



RC>8 reqstore 
RC>8 reqstore 
RC>8 reqstore 
RC>8 reqstore 



P1B (ISTP1B ) (continued) 



(continued) 



Label 



Value 



ISTPICCO (contin. 
PIECX)055 X'8037' 

PIEO0060 X'803C 

PIEO0065 X'8041' 

PIEO0070 X'8046' 

ISTPICCS 
PIEO0120 X'8078' 

PIEO0130 X'8082' 

PIEO0140 X'808C 

P1EO0150 X'8096' 

ISTPICCT 



RC>8 reqstore 
RC > 8 reqstore 
RC>8 reqstore 
RC>8 reqstore 



RC>8 reqstore 
RC>8 reqstore 
RC>8 reqstore 
RC>8 reqstore 



PIE 10420 


X'01A4' 


RC>8 reqstore 


PIE 10430 


X'OIAE' 


CSOL FMCB not found 


ISTPICDD 




PIEI1910 


X'0776' 


R08 reqstore 


PIEI1920 


X'0780' 


ROO CIDCTL find 


PIEI1930 


X'078A' 


ROO CIDCTL finish 


ISTPICDR 




PIEI0510 


X'OIFE' 


RC>8 reqstore 


PIE 10520 


X'0208 1 


ROO CIDCTLfind 


PIEI0530 


X"0212' 


RC>0relstore 


PIE 10540 


X'0210' 


RC>0 relstore 


PIEI0550 


X'0226' 


RC>0CIDaLfind 


ISTPICEI 




PIEI0610 


X'0262' 


RC>8 reqstore 


PIE 10620 


X'026C 


RC>8 getstor 


PIE 10630 


X'0276' 


ROO relstore 


PIE 10640 


X'0280' 


ROO relstore 


ISTPICES 




PIEI3450 


X'0D7A' 


Invalid input NCB 


PIEI3460 


X'0D84' 


RC>8 reqstore 


PIE 13470 


X'0D8E' 


ROO relstore 


ISTPICF1 




PIE 10720 


X'02D0' 


ROO CIDCTLfind 


PIE 10730 


X'02DA' 


ROO CIDCTL find 


PIE 10740 


X'02E4' 


ROO relstore 


PIE 10750 


X'02EE' 


ROO CIDCTL finish 


PIE 10760 


X'02F8' 


ROO CIDCTL fipish 


PIE 10770 


X'0302' 


RC>0 CIDCTL finish 


PIE 10780 


X'030C 


ROO relstore 



PIB (ISTPIB) (continued) 



Constants 


(continued) 


Label 


Value 


Meaning 


ISTPICGI 




PIEO0210 


X'80D2' 


RC>0TPDVTS 


PIEO0220 


X'80DC 


ROO TPDVTS 


PIEO0230 


X'80E6' 


ROO relstore 


PIEO0240 


X'80F0' 


RC>8 reqstore 


PIEO0250 


X'80FA' 


ROO CIDCTL finish 


PIEO0260 


X'8102' 


RC>0CIDaL finish 


ISTPICGP 




PIEI0810 


X'032A' 


RC>8 from reqstore 


PIEI0815 


X'032F' 


ROO CIDCTL finish 


PIE 10820 


X'0334' 


ROO TPDVTS 


PIEI0825 


X'0339' 


ROO CIDCTL finish 


PIEI0830 


X'033E' 


Dsconnect cmmd. in « 


PIEI0835 


X'0343' 


ROO CIDCTL finish 


PIEI0837 


X'0345' 


ROO CIDCTL find 


PIE 10838 


X'0346' 


ROO CIDCTL finish 


PIE 10840 


X'0348' 


RC>8 from reqstore 


PIEI0845 


X'034D' 


ROO CIDCTL finish 


PIEI0850 


X'0325' 


ROO CIDCTL find 


PIEI0855 


X'0357' 


RC>0 CIDCTL finish 


PIE 10860 


X'035C 


ROO CIDCTL find 


PIE 10865 


X'036T 


ROO CIDCTL finish 


PIE 10870 


X'0366' 


ROO CIDCTL find 


PIEI0875 


X , 036B' 


ROO CIDCTL finish 


PIEI0880 


X'0370' 


ROO CIDCTL find 


PIE 10885 


X'0375' 


ROO CIDCTL finish 


PIE 10890 


X'037A' 


ROO CIDCTL find 


PIE 10895 


X'0384' 


ROO from relstore 


ISTPICGR 




PIE 10930 


X'03A2' 


ROO TPDVTS 


PIE 10960 


X'03C0' 


ROO relstore 


ISTPICIN 




PIEO0330 


X'814A' 


RC>8 reqstore 


PIEO6340 


X'8154' 


RC>8 reqstore 


PIEO0350 


X'815E' 


Invalid LCCW 


PIEO0360 


X'8168" 


RC>8 relstore 


ISTPICIT 




PIEO0430 


X^IAE' 


RC>8 reqstore 


PIEO0440 


X'SIBS 1 


ROO from TPDVTS 


PIEO0450 


X'81C2' 


RC>8 from reqstore 


ISTPICLA 




PIEI1720 


X'06B8' 


ROO relstore 


PIEI1730 


X'06C2' 


ROO relstore 


PIEI1740 


X , 06CC 


RC>8 reqstore 


PIEI1750 


X"06D6' 


Unexpected LCPB 



PIB (ISTP1B) (continued) 



Constants (continued) 

Label Value Meaning 



ISTPICLC 
PIEO1220 X'84C4' 

PIEO1230 X'84CE' 



Loop in test channel program 
RC>8 reqstore 



ISTP1CLT 




PIEO0610 


X'8262' 


RC> 8 reqstore 


PIEO0620 


X'826C 


RC>0TPDVTS 


ISTPICMA 

None 

ISTPICNR 






PIEI1120 


X'0460' 


RC>8 from reqstore 


PIEI1125 


X'0465' 


RC>OCIDCTLfind 


PIEI1130 


X'046A' 


RC=0or 12CIDCTLfind 


PIEI1135 


X'046F' 


RC>0CIDCTL finish 


PIEI1140 


X'0474' 


RC>0 from relstore 


PIEI1150 


X'047E' 


RC>0 from relstore 


PIEI1160 


X'0488' 


RC > 8 from reqstore 


PIEI1170 


X'0492 1 


RC>0 from relstore 


PIEI1180 


X'049C 


ROOfrom CIDCTL finish 


PIEO0332 


X'814C 


RC>0CIDaLfind 


PIEO0334 


X'814E' 


RC>0 CIDCTL finish 


ISTPICQP 




PIEI1220 


X'04C4' 


RC>8 from reqstore 


P1EI1230 


X'CMCE" 


RC>0 from relstore 


P!E 11240 


X'04D8' 


RC>0 from relstore 


PIEI1250 


X'04E2' 


RC>0 from relstore 


PIEI1260 


X'04EA' 


RC>0 from relstore 


PIEI1270 


X"04F4' 


RC>0 from CIDCTL for ob 


PIEI1280 


X'04FE' 


RO0 from CIDCTL for rel 


P1EI1290 


X'0508' 


RCXHrom CIDCTL for rel 


PIEI1295 


X'050D' 


RC>0 from CIDCTL for rel 



a lock 
leasing a lock 
leasing a lock 
leasing a lock 



ISTPICRP 




PIEI1320 


X'0528' 


RC>8 reqstore 


ISTPICSC 




P1EO0510 


X'81FE' 


RC>8 from reqstore 


PIEO0520 


X'8208' 


RC>8 from relstore 


PIEO0530 


X'8212' 


RC>8 from reqstore 


PIEO0540 


X'821C' 


RC^^O from relstore 


PIEO0550 


X'8226' 


RC > 8 from reqstore 


PIEO0560 


X'8230' 


RC>0 from relstore 


PIEO0570 


X'823A' 


RC>0 from relstore 


PIEO0580 


X'8244' 


RC > from relstore 


PIEO0590 


X"824E' 


RC > 8 from reqstore 



PIB (ISTPIB ) (continued) 



Label 



(continued) 
Value Meaning 



ISTPICSO 
PIEO1310 X'851E' 

P IE 1320 X'8528' 

PIEO1330 X'8532' 



RC>8 from reqstore 
RC>0CIDQLfind 
RC>0CIDCTL finish 



PIEO0710 


X'82C6' 


RC>8 from reqstore 


PIEO0720 


X'82D0' 


RC>8 from reqstore 


PIEO0730 


X'82DA' 


RC>8 from reqstore 


PIEO0740 


X'82E4' 


RC>8 from reqstore 


PIEO0750 


X'82EE' 


RC>0 from CIDCTL for obtaining a lock 


PIEO0760 


X'82F8' 


RC>0 from CIDCTL for releasing a lock 


ISTPICST 




PIEI3610 


X'OEIA' 


LRA error 


PIEI3635 


X'0E33' 


Unidentifiable completion status 


ISTPICSU 




PIEI1410 


X'0582' 


RC>0 from relstore 


PIE 11420 


X'058C 


RC>0 from relstore 


PIE 11430 


X'0596' 


RC>8 from reqstore 


PIE 1 1440 


X'05A0' 


RC>8 from reqstore 


PIEI1450 


X'05AA" 


RC>0 from TPDVTS 


PIE 11460 


X'05B4' 


RC>0 from CIDCTL find 


PIE 11470 


X'05BE' 


RC>0 from CIDCTL finish 


PIE 11480 


X'05C8' 


RC>0 from relstore 


ISTPICTA 




PIEI1620 


X'0654' 


ROO relstore 


PIEI1630 


X'065A' 


RC>8 reqstore 


ISTPICTC 




PIEO1030 


X'8406' 


RC>0 from CIDCTL find 


PIEO1040 


X'8410' 


RC >8 from reqstore 


PIEO1050 


X'84]A' 


RC>0 from CIDCTL finish 


PIEO1060 


X'8424' 


RC>0 from CIDCTL finish 


PIEO1070 


X'842E' 


RC>8 reqstore 


ISTPICTF 




None 






ISTPICTH 




PIEI1810 


X'0712' 


RC>8 from reqstore 


PIEI1820 


X'071C 


RC>0 from relstore 


PIEI1830 


X'0726' 


RC^ from relstore 


P1EI1840 


X'0730' 


RC>8 from reqstore 


P1EI1850 


X'073A' 


RC>8 from reqstore 


PIEI1860 


X'0744' 


RC>0 from TPDVTS 



PIB (ISTPI B) (continued) 



ISTPIOTO 
PIEO0820 X'8334' 

PIEO0830 X'833E' 

ISTPiaR 
PIEO0930 X'83A2' 

P1EO0940 X'83AC 

PIEO0950 X'83B6' 

ISTP1CXP 
PIE 13660 X"0E4C' 

P1EI3670 X'0E56' 

SSABERV1 

None 

SSABERV2 
PIEI3760 X'OEBO' 

SSABERV3 
PIEI3810 X'0EE2' 

PIEI3820 X'OEEC 

SSABERV4 
PIEI3880 X'0F28' 

PIEI3860 X'OFU' 

PIEI3870 X'OFIE' 

SSABERV5 
PIEI3910 X'0F46' 

PIEI3910 X-0F50' 

SSABERV6 
PIE 1 3960 X'0F78' 

SSRAST14 

None 

SSRAST15 

None 

SMS 

None 



RC>8 reqstore 
RC>0 relstore 



Invalid LCCW 
RC>8 reqstore 
ROO relstore 



LRA error 
Invalid CB input 



Valid CB not found 



LRA error 

CCB not found in ICNCB 



Failing CCW not found 
CCB not found in LONCB 
CC and O APPR LRA 



LRA error 

CCB not found in ICNCB 



P1B (ISTPIB ) (continued) 



Label 

PIE 10192 
PIE 10534 
PIE 10623 
PIE 10627 
PIEO0202 
PIEO0204 
PIE 10904 
PIEI1010 
PIEI1144 
PIEI1145 
PIE11146 
PIEI1147 
PIEO0555 
PIEO0557 
PIE13615 
PIE 13620 
PIE 13625 
PIE 13630 



(continued) 



Value 

X'OOCO' 
X'0216 1 
X'0271' 
X'0273' 
X'80CA' 
X'80CC 
X'0388' 
X'03F2' 
X'0478' 
X'0479' 
X'047A' 
X'047B' 
X'822B' 
X'822D' 
X'OEIF' 
X'0E24' 
X'0E29' 
X'0E2E' 



ISTPICXO 
PIEO0224 X'80E0' 

ISTPIEIR 
PIEO4000 X'8FA0' 

ISTPLIEPB 
PIEO4005 X'8FA5' 

PIEO4006 X'8FA6' 

PEIO4007 X'8FA7' 

ISTPIEPA 
PIE 140 10 X'OFAA' 

ISTPIEIS 
PIEO4015 X'8FAF' 

ISTPIESA 
PIE 140 17 X'OFBT 



Meaning 

RC>0 TPDVTS 

RC>OTPDVTS 

ROOCIDaL finish 

RC-= 01 12 CIDaL find 

RC>0 TPDVTS within linkx 

RC>0 TPDVTS 

RC>0 TPDVTS within linkz 

ISTPICMA-relstcre failed for MTA association FSB 

RC>0 from CIDCTL find 

RC>0 from CIDCTL finish 

RC>0 from CIDCTL find 

ROOfrom CIDaL finish 

ROO from CIDCTL find 

ROOfrom CIDCTL finish 

CCW at head of buffer not read/write/V/RBP 

NOP preceded by write, not write BP 

Insufficient read CCWS or data-chained read 

Unchained write CCW 



RC>0 CIDaL find 
TPDVTS failure 



Reqstore RC>8 
CIDCTL find error 
CIDaL finish error 



TPDVTS failure 
Reqstore RC>8 
Reqstore return CDE>8 



ISTPIETT 
P1EO4020 X'8FB4' 

PIEO4025 X'8FB9' 

ISTPLIECP 
PIEI4020 X'OFBO' 

PIEI4025 X'0FB5' 

ISTPIELO 
PIEO4030 X'8FBE' 



CIDaL find RO=0 

CIDaL relese DAF look RO=0 



CIDaL find error 
CIDaL finish error 



Reqstore RC>8 



PIB (ISTPIB) (cc 



ISTPIELF 
PIEI4035 X'0FC3' 

ISTPIELS 
PIEO4040 X'8FC8' 

ISTPIERO 
PIEO4045 X"8FCD' 

ISTPIERF 
PIEI4050 X'8FD2' 

ISTPIESI 
PIEO4055 X'8FD7' 

ISTPIESG 
PIEC4060 X'8FDC 

PIEO4061 X'8FDD' 



Meaning 
Reqstore RC>8 
Reqstore > 8 
Reqstore > 8 
Reqstore > 8 
Reqstore>8 



Reqstore RC>8 
Reqstore ROO 



RDT (ISTRDT ) 



Dec Hex 





1 


2 


3 














72 48 

76 4C 

80 50 

84 54 



92 5C 

96 60 
100 64 



RDTPRE 
Entry prefix 



RDTPLEN 
Priority and length field 



RDTFORW 
Foreword pointer 



RDTBACK 
Backward pointer 



RDTFLAGS 
Segment flags, unused/refused 



RDTMAXID 
Max node ID 
for network 



RDTNODID 
Node ID for 
this segment 



RDTCTSNT 
Count of SNT entries for segment 



RDTLGCT 

Count of logon 

outstanding 



RDTFLAGB 
F lag byte 



RDTVPAB 
Address of vary PAB 



RDTEPAB 
Address of ERP PAB 



RDTDPAB 
Address of dump/load/restart PAB 



RDTTPAB 
Toltep SSCP PAB 



RDTVYRPH 
@ of Vary RPH Waiting for Restart Completior 



RDTSiNCNT 
Active Subnode 
Count 



(a)NM00007 
Reserved 



RDTPRIOR 
Determines 
Segment Type 



Org RDTPLEN+1 



RDTLEN 
Length of RDT 



RDT (ISTRDT) (Continued) 






















Dec Hex 





1 


2 


3 


Ore 


RDTVYRPH 














108 6C 


RRNVYRPH 
Delete Alias 


Ore 


RDTSTCNT 
















112 70 


RRNSTCNT 
Delete Alias 






Alphabetical L 


st of F 


ields in 


ISTR 


DT 




Field 


Dec 


Hex 


Field 


Dec 


Hex 


Field 


Dec 


Hex 


@NM00007 

RDTBACK 

RDTCTSNT 

RDTDPAB 

RDTEPAB 

RDTFLAGB 

RDTFLAGS 


0113 
0080 
0086 
0100 
0096 
0091 
0084 


0071 
0050 
0056 
0064 
0060 
005B 
0054 


RDTFORW 

RDTLEN 

RDTLGCT 

RDTMAXID 

RDTNODID 

RDTPLEN 

RDTPRE 


0076 
C073 
0090 
0088 
0089 
0072 
0000 


004C 
0049 
005A 
0058 
0059 
0048 
0000 


RDTPRIOR 

RDTSTCNT 

RDTTPAB 

RDTVPAB 

RDTVYRPH 

RRNSTCNT 

RRNVYRPH 


0072 
0112 
0104 
0092 
0108 
0112 
0106 


0048 
0070 
0063 
005C 
006C 
0070 
006C 


Flag Meanings 


















Hex 

Disp Flag By 


te Contents 






Bit 
Pattern 




Pattern 
Name 




Pattern 
Meaning 



0048 RDTPRIOR Determines Segment 



005B RDTFLAGBFlag E 



(55NM00006 

RDTPRIAP 

RDTPRILC 

RDTPRIRN 

RDTPRISW 

RDTPRILS 

RDTOUERP 
RDTPRGDN 
RDTCTPGD 
RDTCTCFL 



. 1... RDTBhSET 

.. .111 RDTRSV01 



Not Used 

Application Segment 
Local Segment 
RN Segment 
Switched Segment 
Local Subarea Segment 

1 = Repeat ERP 
1 = Purge Issued 
1 - Contact Purged 
Higher Failure- 
Contact Flushed 
BHSET Required 
Reserved 



Dec Hex 





1 


2 


3 





RHFLAGS 
Request header flags 




Org 


WFIAGS 











RH1 

1st RH byte 




Org F 


HFLAGS + 1 




1 1 


RH2 

2nd RH byte 




OrgRHFLAGS+2 






2 2 


RH3 

3rd RH byte 




Flags and masks 







Disp. Flag 
0(0) RH1 



Contains 
First RH byte 



Second RH byte 



2(2) RH3 



Third RH byte 



RHQS 


X'80' 


- request, 1 - response 


RHTYPE 


X'40' 


- data, 1 - control 


RHSCI 


X'20' 


- FM, 1 - system control 


RHDIRI 


X'10' 


- with, 1 - against 


RHFORMAT 


X'08' 


- unformatted, 

1 - formatted 


RHSENSE 


X'04' 


- not included, 

1 - included 


RHCHAIN 


X'03' 


Chaining control 
- middle, 1 - last, 
2 - first, 3 - only 


RHFME 


X'80' 


Q - FME requested, 
S -FME 


RHPE 


X'40' 


Q - PE requested, S - PE 


RHRRN 


X'20' 


Q - RRN requested, 
S -RRN 


RHEXCEPT 


X'10' 


Q - exception responses 
only, S - error 


RHRETRY 


X'08' 


Q - retry 


RHBUSY 


X'08' 


S - busy 


RHRSVD1 


X'04' 


Q - reserved 


RHNIOP 


X'04' 


S - inoperative 


RHRSVD2 


X'02" 


Q - reserved, S - reserve 


RHPACE 


X'Ol' 


Q - pacing 


RHBB 


X'80' 


Begin sequence 


RHFB 


X'40' 


End sequence 


RHCDIR 


X^O' 


Change direction 


RHRCDIR 


X'10' 


Request change direction 


RHRSVD3 


X'08' 


Reserved 


RHLOG 


X'04' 


Log 


RHRSVD4 


X'02' 


Reserved 


RHRSVD5 


x'or 


Reserved 



RH (ISTRH ) (continued) 
Constants in ISTRH 



Label 


Value 


Meaning 


RHFIRST 


B'10' 


First In chain 


RHMIDLE 


B'OO' 


Middle of chain 


RHLAST 


B'Ol' 


Last in chain 


RHONLY 


B'lT 


Only one in chair 


RHRESP 


X' 938000' 


RH response mask 


RHREQ 


X'030000' 


RH request mask 



RPH (ISTRPH) 



Dec Hex 




RPHTYPE 
Control Block 
Type 



RPHLNGTH 
Length in 
Bytes 



RPHFLAGS 

Dependent 
Flags 



RPHFLGB 
Second Flag 
Byte 



RPHRPHA 
Address of next RPL Header 



RPHTSKID 
Task Identification or Address of APS Table 



RPHDVTA 
Address of Current DVT 



RPHRESMA 
TPWAIT-Post Information 



RPHPABOF 
Offset of PAB 
in Control BLK 



RPHMAJCB 
Address of Major Control Block 



RPHWEA 
Address of Work Element 



RPHSRPRM 
Service Routine Parm. Field 



RPHCRR 
Address of Component Recovery Record 



RPHPABWD 
PAB Word Address 



RPHWORK 
16 Word Work Area 



J 



RPH (ISTRPH) (Continued) 















Dec 


Hex 

68 


12 3 


104 


RPHNEXPO 
Address Next RPH to be Posted 






Drg RPHRPHA 




4 


4 


First Byte of 
RPHRPHA 






( 


Drg RPHRPHA + 1 




5 


5 


RPHRPHAP 1 




( 


DrgRPHTSKID 




8 


8 


(C&NM00002 
RPH TSK ID 


RPHTIK 
TIK 




( 


Drg RPHRESMA 




16 


10 


RPHWPFLG 
Wait-Post Flags 






( 


Drg RPHRESMA + 


1 


17 


11 


RPHRESUM 
Resume Address 




( 


Drg RPHWEA 




24 


18 


RPHCSPA 
Address of ISTCSP 




( 


Drg RPHCSPA 




24 


18 


First Byte of 
RPHCSPA 






( 


Drg RPHSPRM 




28 


1C 


RPHSRP12 
Count of Q'ed SMS Requests 


RPHSRP34 
Size of Q'ed SMS Requests 




( 


Drg RPHPABWD 




36 


24 


RPHPABFG 
Flag Byte 






( 


Drg RPHPABWD + 


1 


37 


25 


RPHPABQP 
Pointer to Queue of PAB's 




Org RPHPABQP 




37 


25 


RPHPABQA 
PAB Pointer 



RPH (1STRPH) (Continued) 
Dec Hex 



12 3 



Org RPHSAVE1 



RPHSBYTE 
1-Byte Save 
Field 



RPHSBITS 
Save Field for 
Flag Byte 



Org RPHSAVE 1 + 2 



Org RPHWORK + 4 



RPHSHALF 
Half Word Save Area 



48 30 

52 34 

56 38 

60 3C 

64 40 

68 44 

72 48 

76 4C 

80 50 

84 54 

88 58 

92 5C 



RPH (ISTRPH) (Continued) 























Dec Hex 





1 




2 


1 


3 




96 60 


RPHSAVE15 




100 64 


RPHSAVE16 




Alphabetica 


List of F 


ields in 


STRPH 










„ 


Field 


Dec 


Hex 


Field 


Dec 


Hex 


Field 


Dec 


Hex 


(3NM00002 


0008 


0008 


RPHRPHA 


0004 


0004 


RPHSAV15 0096 


0060 


RPHCRR 


0032 


0020 


RPHRPHAP 


0005 


0005 


RPHSAV16 0100 


0064 


RPHCSPA 


0024 


0018 


RPHSAVE1 


0040 


0028 


RPHSBITS 0041 


0029 


RPHDVTA 


0012 


OOOC 


RPHSAVE2 


0044 


002C 


RPHSBYTE 0040 


0028 


RPHFLAGS 


0002 


0002 


RPHSAVE3 


0048 


0030 


RPHSHALF 0042 


002A 


RPHFLGB 


0003 


0003 


RPHSAVE4 


0052 


0034 


RPHSRFRM 0028 


001C 


RPHLNGTH 


0001 


0001 


RPHSAVE5 


0056 


0038 


RPHSRP12 0028 


001C 


RPHMAJCB 


0021 


0015 


RHPSAVE6 


0060 


003C 


RPHSRP34 0030 


001E 


RPHNEXPO 


0104 


0068 


RPHSAVE7 


0064 


0040 


RPHTIK 


0011 


000B 


RPHPABFG 


0036 


0024 


RPHSAVE8 


0068 


0044 


RPHTSKID 0008 


0008 


RPHPABOF 


0020 


0014 


RPHSAVE9 


0072 


0048 


RPHTYPE 0000 


0000 


RPHPABQA 


0037 


0025 


RPHSAV10 


0076 


004C 


RPHWEA 0024 


0018 


RPHPABQP 


0037 


0025 


RPHSAV11 


0080 


0050 


RPHWORK 0040 


0028 


RPHPABWD 


0036 


0024 


RPHSAV12 


0084 


0054 


RPHWPFLG 0016 


0010 


RPHRESMA 


0016 


0010 


RPHSAV13 


0088 


0058 








RPHRESUM 


0017 


0011 


RPHSAV14 


0092 


005C 








Flag Mean in 


gs 
















Hex 








Bit 


Pattern 


Pattern 




Disp Flag 


Byte 
LAGS 


Conten 


ts 
Dependent 


P 

1 


atterr 


Name 
... RPHOGIND 


Meaning 
Open Gate 




0002 RPHF 


System 




Indicator 






Flags 




.1.. . 


... RPHSPGIN 


Special Gate Open 
















Indicator 












..1. . 


. . . RPHAPTYP 


APS is a User Exit 










...1 . 


. . . RPHSMQ 


Indicator if RPH is 
















to be Queued 










.... 1 


. . . RPHSMTYP 


Request Type is Buffer 
















or Double- 


Word 












1 . . RPHSMCLR 


Indicator if Buffer 
















to be Cleared 












. 1 . RPHMLTCP 


Used by Local 3270 
















Support wh 


en building 
















Multiple Chan Program 












. . 1 RPHFSTLC 


Used by Local 3270 
















Support to Indicate 
















First LCCW 














..1 RPHFNFLG 


LCCW Set 


: unction 
















Flags 




0003 RPHF 


LGB 


Second 


Flag Byte 


1... . 


. . . RPHLOCK 


Locking Option 










.1.. . 


... RPHBSSP 


System Sen, 


ices 


















Progress 





RPH (ISTRPH) (Continued) 



Flag Meanings (Cont 


inued) 








Hex 




Bit 


Pattern 


Pattern 


Disp Flag Byte 


Contents 


Pattern Name 


Meaning 






..1. 


.... RPHBAPS 


STG. Obtained by APS 






...1 


1111 RPHNRSAV 


Do not Save on 
Activate 


0004 


First Byte of 




.... RPHGATE 


Gating Flag 




RPHRPHA 


.111 1111@NM0001 


Reserved 


0010 RPHWPFLG 


Wait-Post Flags 


1111 


.... RPHRSKEY 

1... RPHWT 
.1.. RPHPT 
..11(5)NM00003 


Storage Protect Key 

to Resume Processing 

Wait Bit 

Post Bit 

Reserved for Wait/Post 


0018 


First Byte of 
RPHCSPA 




.... RPHWEGT 


Gate for Work 
Element Proc. 


0024 RPHPABFG 


Flag Byte 


1... 
.1.. 

.1.. 

..1. 
...1 


.... RPHDEACT 

.... RPHLKFRE 

.... RPHPGCMP 
.... RPHRLCRA 
.... RPHAUTEX 
1... RPHPURGE 

.111@NM00004 


RPH has been 
De-activated VS/1 
only 

Locks held by Abended 
Process have been 
Freed (VS/1 only) 
Purge Complete 
(VS/2 only) 

Indicates that ISTAPC64 
should free the CRA 
Exit to Authorized 
User VS/2 only 
RPH Flagged by 
Recovery to be purged 
by PSS VS/2 only 
Reserved 


0029 RPHSBITS 


Save Field for 




.... RPHSBIT1 


1st Save Field 




Flag Byte 


.1.. 


.... RPHSBIT2 
.... RPHSBIT3 
.... RPHSBIT4 
1... RPHSBIT5 
.1.. RPHSBIT6 
..1. RPHSBIT7 
...1 RPHSBIT8 


2nd Save Field 
3rd Save Field 
4th Save Field 
5th Save Field 
6th Save Field 
7th Save Field 
8th Save Field 



Constants in ISTRPH 



Label 


Value 


Meaning 


RPTYPE 


X'OT 


Type Code for RPH 


RPHWT0 


X'F7FFFFFF' 


Turn RPHWT Off 


RPHWT 1 


X'08000000' 


Turn RPHWT On 


RPHPT0 


X'FBFFFFFF' 


Turn RPHPT Off 


RPHPT1 


X'04000000" 


Turn RPHPT On 


RPHPABQ1 


X'000000' 


Turn RPHPBQ Gate 



Dec Hex 




@NM00017 
RPLID 



@NM00025 
Reserved 



(3NM00029 
RPLOPT1 



@NM00038 
Reserved 



1 

(35NM0OO18 
Subtype 
X'FF'=active 
X'00'= inactive 



@NM00019 
Reserved 



RPLLEN2 
RPL Length 



RPLPLHPT 
RPLH Pointer 



(a)NM00020 
CID or NIB Pointer RPLARG 



@NM00021 
Pointer to Area RPLAREA 



@NM00022 
Record Length RPLRLEN 



@NM00023 
Area Length RPLBUFL 



(5>NM00024 
Pointer to ACB RPLDACB 



@NM0C026 
Request Code 
RPLREQ 



(3NMQ0033 
Reserved 



(3NM00027 
Reserved 



RPLEXTDS 
Exit Definitic 



(3NM00028 



@NM00037 
Reserved 



(a)NM00039 
Feedback RC RPLFDBK 



RPLAAREA 
Alternate Area Pointer 



RPLECB 
ECB or Pointer to ECB/EXIT 



RPLAARLN 
Alternate Area Length 



RPL (ISTRPL) ( Continued) 



Dec Hex 
52 34 



RPLARCLN 
Alternate Record Size 



RPLFDBK2 
Feedback Word 



RPLUSFLD 
User Field 



RPLOPTC3 
Additional Option Codes 



RPLOPTC3 
Move VTAM Options 



RPLRH3 
Third RH 
Byte 



RPLCHN 
Position ir 
HU Chain 



RPLSRTYP 
Send or 
Receive Type 



RPLVTFL1 

VTAM 

Flags 



RPLVTFL2 

VTAM 

Flags 



RPLCNTRL 

PU Control Code 



RPLOBSQV 
STSN Outbnd. Seq. Nr. 



RPLOBSQ 
STSN Outb. 
Action Code 



RPLIBSQ 
STSN Inbound 
Action Code 



RPLIBSQV 
STSN Inbind. Seq. Nr. 



RPLSEQNO 
Sequence Number 



RP LOS ENS 
Sense Output Data 



RPLACTIV 
Subtype-X'FF' 
= Active, 
X'OO' = Inact. 



RPLSIGDA 
Signal Data 



RPL (ISTRPL) ( Continued) 



12 3 



Org@NM00020 



RPLSAF 


RPLDAF 



Org RPLEXTDS 



Org (SNM00039 



Org (SNM00039+2 



§)NM00040 
RPLRTNCD 


(cpNM00041 
RPLFDB2 



(3 NM00042 
RPLFD33 



Org RPLECB 



Third byte of 
RPLECB 



Org | 



RPLSSNSI 
System Sense Inp. 



Org RPLSSNSI 



RPLDSB 
Device Status 



Org RPLDSB 



RPLDSB 1 
Dev. Status 
Byte 1 



@ NM00044 
Reserved 



Org RPLDSB 1 



RPLSSEI 
SysSNS 
Error Codes 



RPL (1STRPL) ( Continued) 



X 





1 


2 


3 


Org 


RPLDSB+1 










RPLDSB2 
Dev. Status 
Byte 2 




Org RPLDSB2 








RPLSSMI 
SYS SNS 
Mod In 




Org RPLSIGDA+2 








RPLUSNSI 
User Sense Input 


Org RPLUSNSI 








RPLESR1 

Extd.Syst. 
Resp. 1 


RPLESR2 
Extd.Syst. 
Resp. 2 


Org 


RPLOPTC2 








RPLOPT5 
Fifth Byte 
of Options 




Org 


RPLOPTC2+1 






RPLOPT6 
Sixth Byte 
of Options 




Org RPLOPTC2+2 








RPLOPT7 
Seventh Byte 
of Options 




Org RPLOPTC2+3 








RPLOPT8 
Eighth Byte 
of Options 



Org 


RPLOP7C3 






RPLOPT9 
Ninth Byte 
of Options 




Org 


RPLOPTC3+1 






RPLOPT10 
Tenth Byte 
of Options 



RPL (ISTRPL) ( Continued) 



Org RPLOPTC3+2 



RPLOPT1I 
Eleventh Byte 
of Options 



Org RPLOPTC3+3 



RPLOPT12 
Twelvth Byte 
of Options 



RPLCNTDF 
Data Flow 
Control Codes 



Org RPLCNTRL+1 



RPLCNTDC 
Data Flow 
Control CTD 



Org RPLCNTRL+2 



RPLCNTSC 
Session Control 
Codes 



Org RPLOSENS 



RPLSSNSO 
System Sense Output 



Org RPLSSNSO 



RPLSSEO 
System Sense 
Error Code 



Org RPLSSNSO+1 



RPLSSMO 
System Sense 
Mod Output 



Org RPLOSENS+2 



RPLUSNSO 
User Sense Output 



RPL (ISTRPL) (ConHnued) 



Alphabetical List of Fields 


in ISTRPL 












Field 


Dec Hex 


Field 


Dec 


Hex 


Field 


Dec 


Hex 


(3NM00017 


0000 0000 


RPLCHN 


0076 


004C 


RPLOPT6 


0065 


0041 


@NM00018 


0001 0001 


RPLCNTDC 


0078 


004E 


RPLOPT7 


0066 


0042 


QNM00019 


0002 0002 


RPLCNTDF 


0077 


004D 


RPLOPT8 


0067 


0043 


@NM00020 


0008 0008 


RPLCNTRL 


0077 


004D 


RPLOPT9 


0068 


0044 


(3NM00021 


0012 000C 


RPLCNTSC 


0079 


004F 


RPLOSENS 


0088 


0058 


@NM00022 


0016 0010 


RPLDAF 


0010 


000A 


RPLPLHPT 


0004 


0004 


(3NM00023 


0020 0014 


RPLDSB 


0056 


0038 


RPLRH3 


0072 


0048 


(a)NM00024 


0024 0018 


RPLDSB1 


0056 


0038 


RPLRSV1 


0093 


005D 


(3NM00025 


0028 00 1C 


RPLDSB2 


0057 


0039 


RPLSAF 


0008 


0008 


(3NM00026 


0029 00 ID 


RPLECB 


0044 


002C 


RPLSEQNO 


0086 


0056 


(3NM00027 


0030 00 IE 


RPLESR1 


0058 


003A 


RPLSIGDA 


0096 


0060 


(3NM00028 


0031 001F 


RPLESR2 


0059 


003 B 


RPLSTYP 


0073 


0049 


(3NM00029 


0032 0020 


RPLEXTDS 


0034 


0022 


RPLSSEI 


0056 


0038 


(a)NM00033 


0033 0021 


RPLEXTD1 


0034 


0022 


RPLSSEO 


0088 


0058 


(3NM00037 


0035 0023 


RPLFDBK2 


0056 


0038 


RPLSSMI 


0057 


0039 


(3NM00038 


0036 0024 


RPLIESQ 


0085 


0055 


RPLSSMO 


0089 


0059 


@NM00039 


0037 0025 


RPLIESQV 


0082 


0052 


RPLSSNSI 


0056 


0038 


(3NM00040 


0037 0025 


RPLLEN2 


0003 


0003 


RPLSSNSO 


0088 


0058 


(a>NM00041 


0038 0026 


RPLOBSQ 


0084 


0054 


RPLUSFLD 


0060 


003C 


(q)NM00042 


0039 0027 


RPLOBSQV 


0080 


0050 


RPLUSNSI 


0058 


003A 


(3NM00043 


0044 002C 


RPLOPTC2 


0064 


0040 


RPLUSNSO 


0090 


005A 


(a)NM00044 


0047 002F 


RPLOPTC3 


0068 


0044 


RPLVTFL1 


0074 


004A 


RPLAAREA 


0040 0028 


RPLOPT10 


0069 


0045 


RPLVTFL2 


0075 


004B 


RPLAARLN 


0048 0030 


RPLOPTl 1 


0070 


0046 








RPLAVTIV 


0092 005C 


RPLOPTl 2 


0071 


0047 








RPLARCLN 


0052 0034 


RPLOPT5 


0064 


0040 








Flag Meanings 














Hex 






Bit 


Pattern 


Pattern 


Disp Flag Byte Contents 


Pattern 


Name 


Meaning 


002E 


Third Byte of 


1 




RPLPOST 


Event Complete 




RPLECB 




111 111 


ZRPL2 


Reserved 


0020 @NM00029 RPLOPTl 


1111 ... 


@NM00030 Reserved 












@NM00031 RPLASY 










... .11 


@NM00032 Reserved 













RPLECBIN 


1 


= External ECB 


0022 RPLEXTD1 




1 




RPLEXSCH Exit Scheduled 














Ir 


dicator 










1 


RPLNEXIT No Exit Specified 










1. ... 


RPLEXIT 


Exit 












(3NM00034 Reserved 












@NM00035 Reserved 










'.'. .']'. 


RPLNIB 


1 


= ARG Has NIB 














Pointer 










.. ..1 


RPLBRANC 1 


= Branch Entry 














to 


Macro 













@NM00036 Reserved 



RPL (ISTRPL) (Continued) 
Flag Meanings (Continued) 
0026 @NM00041 RPLFDB2 



0027 (55NM00042 RPLFDB3 



0038 RPLSSEI Sys.Sns Err. Codes 



004A RPLVTFL1 VTAM FIc 



004B RPLVTFL2 VTAM Flags 



004C RPLCHN Position in HU Chai 



004D RPLCNTDF Data Flow Cntrl 



1 RPLERLK 


Error Lock Set 


.1 RPLRVID 


RVI Received 


..1 RPLATND 


Attention Received 


...1 .... RPLDVUNS 


Device Unuseable 


.... 1... RPLIOERR 


I/O Error Type 




(0-lnput, 1 -Output) 


1.. RPLDLGFL 


Dialog Initiation 




Failed 


1. RPLCUERR 


Control Unit Failure 


1 RPLSTSAV 


Sense Bytes Present 


1 RPLUINPT 


Unsolicited Input 


.1 RPLTSV32 


Reserved 


..1 RPLREOB 


End of Block 


...1 .... RPLREOM 


End of Message 


.... 1... RPLREOT 


End of Transmission 


1.. RPLLGFRC 


Logoff Received 


1. RPLRLG 


Leading Graphics 




Received 


1 RPLRDSOH 


SOH Received 


1 RPLPATHI 


SSENSEI Path 


.1 RPLCPMI 


SSENSE1 CPM 


..1 RPLSTATI 


SSENSEI State 


...1 .... RPLFII 


SSENSEI Fl 


1... RPLRR1 


SSENSEI RR 


Ill @NM00045 - 


Reserved for VTAM 


1 @NM00056 


Reserved 


.1 RPLVTUSE 


SWITCHC 




0=APP/l=System 


..11 1111 @NM00057 


Reserved for VTAM 


1111 .... RPLOSTV 




1 RPLSCHED 


Post 0=RESP/l=Sched 


.111 .... (3NM00058 


Reserved for VTAM 


.... 1111 RPLRESP 




1... @NM00059 


Reserved for VTAM 


1.. RPLEX 


Respond 0=NEX/1=EX 


1. RPLNFME 


Respond 0=FME/1=NFM 


1 RPLRRN 


Respond 0=NRRN/ 




1=RRN 


1 RPLFIRST 


Chain First 


.1 RPLMIDLE 


Chain Middle 


..1 RPLIAST 


Chain Last 


...1 .... RPLONLY 


Chain Only 


.... 1111 (3NM00060 


Reserved for VTAM 


1 RPLDATA 


Control Data 


.1 RPLCNCEL 


Control Cancel 


..1 RPLQC 


Control QC 


...1 .... RPLQEC 


Control QEC 


.... 1... RPLCHASE 


Control Chase 


1.. RPLRELQ 


Control RELQ 



RPL (ISTRPL) (Continued) 
Flag Meanings (Conlinued) 



Hex 

Disp Flag Byte 



004E RPLCNTDC 



004F RPLCNTSC 



Data Flow Control 
CTD 



Session Control 
Codes 



0040 RPLOPT5 Fifth Byte of Options 



1.. 
.1. 

..1 

1.. 
.1. 
.1 

.. 

1. 
.1 


...1 
iiii 

.i.. 
..]. 

i... 
.i.. 



0041 RPLOPT6 Sixth Byte of Options 1. 



0042 RPLOPT7 Seventh Byte of 



Pattern 


Pattern 


Name 


Meaning 


RPLQI 


Reserved for VTAM 


@NM00061 


Reserved for VTAM 


RPLBID 


Control BID 


RPLRTR 


Control RTR 


RPLLUS 


Control LUS 


RPLSIGNL 


Control Signal 


©NM00062 


Reserved for VTAM 


RPLSDT 


Control SDT 


RPLCLEAR 


Control Clear 


RPLSTSN 


Control STSN 


RPLSHUTD 


Control Shutd 


RPLSHUTC 


Control Shutc 


RPLRQR 


Control RQR 


RPLRSHUT 


Control RSHUTD 


@NM00063 


Reseived for VTAM 


RPLDLGIN 


Dialog Indicator 




1 = CS, = CA 


0NMOOO64 


Reserved 


RPLPSOPT 


Pass Option 


RPLNERAS 


Write No Erase 


RPLEAU 


Write Erase 




Unprotected 


RPLERACE 


Write Erase 


RPLNODE 


Node Indicator 




1 = Any, =Spec 


RPLWROPT 


Write Option, 




1 = Conv, = 




Nconv 


RPLEOB 


End of Block 


RPLEOM 


End of Message 


RPLEOT 


End of Transmission 


RPLCOND 


Reset Conditional 


RPLNCOND 


Reset Unconditional 


RPLLOCK 


Reset Lock 


(3NM00047 


Reserved 


RPLRSV68 


Reserved 


RPLCNNALL 


Connect AM 


RPLCNANY 


Connect Any 


RPLCWYMM 


Connect Immediate 


RPLQOPT 


Open Destination 




Q Opt 


RPLTPOST 


1 = Already under 


RPLRLSOP 


Release Option 


RP LRS V77 


Reserved 


RPLRSV78 


Reserved 



RPL (ISTRPL) (Continued) 



Flag Meanings (Continued) 



Hex 






Bit 


Pattern 


Pattern 


Disp 


Flag Byte" 


Contents 


Pattern 


Name 


Meaning 


0043 


RPLOPT8 


Eigth Byte of Options 


1 

.1 

..1 


RPLODACQ 

RPLODACP 

@NM00048 

RPLPEND 

RPLSESS 

RPLACTV 

RPLUNCON 

RPLRSV88 


Acquire 

Accept (Default) 
Reserved 
Per.d (Default) 
Session 
Active 
Uncondl 
Reserved 


0044 


RPLOPT9 


Ninth Byte of Options 


1 

.1 

..1 


RPLLOGON 

RPLDEVCH 

RPLTERMS 

RPLCOUNT 

RPLAPPST 

RPLRNNM 

RPLCIDE 

RPLTOPL 


INQ Logon MSG 
(Default) 
INQ Device Char 
INQ Terms 
INQ Counts 
INQ Appstat 
INQ Rnncme 
INQCidxIate 
INQ Top logon 


0045 


RPLOPT10 


Tenth Byte of Oprions 


1 

!.i! .... 


RPLBSCID 
RPLDSPLY 
RPLSPARM 
RPLRSV12 
RPLRSV13 
RPLRSV14 
RPLRSV15 
RPLRSV16 


INQ BSC ID 
INQ Display 
INQ Session 
Reserved 
Reserved 
Reserved 
Reserved 
Reserved 


0046 


RPLOPT11 


Eleventh Byte of 
Options 


i 

.i 

..i 


RPLQUIES 

RPLSTART 
RPLSTOP 
RPLRSVE4 
RPLRSVE5 
RPLRSVE6 


Setlogon Quiesce 

(Default) 

Setlogon start 

Setlogon Stop 

Reserved 

Reserved 

Reserved 






' 




RPLRSVE7 
RPLRSVE8 


Reserved 
Reserved 


0047 


RPLOPT12 


Tv/elvth Byte of 


i 


(3NM00049 


Reserved 






Options 


.i 

..] 

i 


RPLKEF.P 

RPLTRUNC 

RPLNIBTK 

(3NM00050 

@NM00051 

(55NM00052 

RPLFMHDR 


Receive Keep 
Receive Trunc 
Receive NIBTK 
Reserved 
Reserved 
Reserved 

=NFMHDR 

1 = FMHDR 


0048 


RFLRH3 


Third RH Byte 


i 

.i 


RPLBB 
RPLEB 


Bracket = NBB 
1 = BB 

Bracket =NEB 
1 = EB 



RPL (ISTRPL) (Continued) 
Flag Meanings (Continued) 



Hex 






Bit 


Pattern 


Pattern 


Disp 


Flag Byte 


Contents 


Pattern 
..1 

...1 .... 

.... 1... 


Name 
RPLCMD 

RPLCHREQ 

RPLCSI 


Meaning 

CHNGDIR 

= NCMD, 

1 = CMD 
CHNGDIR 
0=NREQ, 
1 =REQ 
Code Selection 
Indicator = Basic 
Code/1 = Alternate 
Code 








Ill 


@NM00053 


Reserved for VTAM 


0049 


RPLSRTYP 


Send or Receive Type 


1111 .... 
1 


RPLSTYPE 
RPLSRESP 


Send Type 
Stype = REQ/ 
1 =RESP 








.111 .... 


(3NM00054 


Reserved for VTAM 








.... 1111 
.... 1... 

1.. 

1. 

1 


RPLRTYPE 
RPLRRESP 

RPLNFSYN 
RPLDFASY 
(3NM00055 


Receive Type 
Rtype = NRESP/ 
1 = RESP 
Rtype 

= DFSYN/ 

1 = NDFSYN 
Rtype 

= NDFASY/ 

1 = DFASY 
Reserved 


0054 


RPLOBSQ 


STSN Outb. Action 


1 


RPLOSET 


OBSQACSet 






Code 


.1 


RPLOTST 

RPLORSET 

RPLOIGN 

RPLOPOS 

RPLONEG 

RPLOINV 

<a>NM00064 


OBSQAC Testset 
OBSQAC Reset 
OBSQAC Ignore 
OBSQAC Testpos 
OBSQAC Testneg 
OBSQAC Invalid 
Reserved for VTAM 


0055 


RPLIBSQ 


STSN Inbound 


1 


RPLISET 


IBSQAC Set 






Act. Code 


.1 


RPLITST 

RPLIRSET 

RPLIIGN 

RPLIPOS 

RPLINEG 

RPLIINV 

(5>NM00065 


IBSQAC Testset 
IBSQAC Reset 
IBSQAC Ignore 
IBSQAC Testpos 
IBSQAC Testneg 
IBSQAC Invalid 
Reserved for VTAM 


0058 


RPLSSEO 


System Sense 


1 


@NM00066 


Reserved for VTAM 






Err.CD/S 


.1 

.... 1... 


RPLCPMO 
RPLSTATO 
RPLFIO 
RPLRRO 


SSENSEO CPM 
SSENSEO State 
SSENSEO Fl 
SSENSEO RR 








Ill 


@NM00067 


Reserved for VTAM 



RPL (ISTRPL) (Continued) 



The following Equates are for the Various Request Codes that may be set 



RPLWRITE 


X'lT 


Write 


RPLRESET 


X'12" 


Reset 


RPLDO 


X'13' 


Do 


RPLCHECK 


XM4' 




RPLQUISE 


X'15' 


Quiesce 


RPLSMLGO 


X'16* 


Simulated Logon 


RPLOPNDS 


X'17" 


Open Destination 


RPLCHNG 


X'19' 


Change 


RPLINQIR 


XMA' 


Inquire 


RPLINTPT 


X'lB' 


Interpret 


RPLREAD 


X'lD' 


Read 


RPLSLICT 


X'lE' 


Solicit 


RPLCLOSE 


XMF' 


Close Destination 


RPLCLACB 


X'2T 


Close ACB (Internal Only) 


RPLSNDCD 


X'22' 


Send 


RPLRCVCD 


X'23 1 


Receive 


RPLRSRCD 


X'24' 


Resetsr 


RPLSSCCD 


X'25' 


Sessionc 


The following 


I are possis 


;ble Return Codes to be mapped against 


RPLNOERR 


X'OO' 


No 


RPLCBLKE 


X'04" 


Invalid REQ or CTL Block 


RPLLOGIC 


X'08' 


Logical Error 


RPLPHYSC 


X'OC 


Physical Error 


RPLNGRCC 


XMO' 


Neg Response to Cond CMD 


RPLSPECC 


X'14' 


Special Condition 


RPLCMDRT 


X'18' 


Command Reset 


RPLPURGE 


X'lC' 


Command Purged 


RPLVTMNA 


X'20' 


VTAM Not Active 


RPLSYERR 


X'24" 


System Error 


RPLDEVDC 


X'28' 


Device Disconnected 


RPLLIMEX 


X'2C 


NIBResplimExcd. 


RPLEXRQ 


X'30' 


Except. REQ. Received 


RPLEXRS 


X'34" 


Except. Resp. Received 


RPLNOIN 


X'38' 


No Input Available 


Reason Code < 


squates for RPLFDB2 if RPLRTNCD = X'08' 


RPLCBERR 


X'01' 


Invalid Control Block 


RPLRNORT 


X'02' 


No Rtype Specified 


RPLCLSIP 


X'03' 


CLSDST in Progress 


RPLSTEAM 


X'03' 


Sess. Team in Proc. 


RPLCIDNG 


X'05' 


Invalid CID 


RPLILDOP 


X'06' 


Bad LDO OP Code 


RPLILSEQ 


X'07' 


Bad LDO Sequence 


RPLWANCR 


X'08' 


Read not Chained 


RPLSANOD 


X'OC 


SOL Any +No Dev Conn 


RPLSANDA 


X'OD' 


SOL Any + No Dev Avail 


RPLSTOOD 


X'OE' 


SOL to Output Only 


RPLSDE 


X'OF' 


SOL + Data Already Expected 



RPL (STRPL) (Continued) 



Constants in 


ISTRPL (Continued) 


Label 


Value r 


RPLRTOOD 


X'10' F 


RPLWTOI 


X'll' \ 


RPLEWNS 


X'12' E 


RPLEWAU3 


X'13' E 


RPLCVVTOO 


X'14' \ 


RPLCWB 


X'15' E 


RPLCCCPY 


X'I6' < 


RPLIDA 


X'17' 1 


RPLLILDOA 


X'18' 1 


RPUTOJ 


X'19' 


RPLM255 


X'lA' ( 


RPLRJLCP 


X'lB' F 


RPLCRIRT 


X'lC 1 


RPLRIOCC 


X'lD' F 


RPLEWBLK 


X'lE 1 E 


RPLCRSDC 


X'lF' 5 


RPLDOFOD 


X'20' E 


RPL1REST 


X'21' 1 


RPLINVAC 


X'22' 1 


RPLINVEX 


X'23' I 


RPLWBT32 


X'24' \ 


RPLRMOBN 


X'25" F 


RPLCTN32 


X'26' ( 


RPLWCNVR 


X'27' ^ 


RPLRNFT3 


X'28' F 


RPLRCINV 


X'29' F 


RPLINVRM 


X'2A' 1 


RPLATSFI 


X'2B' / 


RPLIIINA 


X'2C 1 


RPLICNDN 


X'2D' 1 


RPLILSIN 


X'2E' 1 


RPLIICBE 


X'2F' < 


RPLOLIPT 


X'30' ( 


RPLINTNA 


X'31' 1 


RPLRCLCK 


X'32' F 


RPLSDQT 


X'32' [ 


RPLSDEX 


X'33' F 


RPLSDNP 


X'34' F 


RPLSCEM 


X'35' < 


RPLSCEF 


X'36' ( 


RPLSNQC 


X'37' < 


RPLSINVC 


X'38' 1 


RPLSDFR 


X'3?' < 


RPLSNOS 


X'3A' 5 


RPLSNOUT 


X'3B' F 


RPLSNMC 


X'3C' ( 


RPLSSEQ 


X'3D' S 


RPLSINVS 


X'3E' F 


RPLSINVR 


X'3F' I 


RPLOCE01 


X'40' 1 


RPLOCE02 


X'41' 1 



Meaning 

Read to Output Only 
Write to Input Only 
Era se to Non 2265/3270 
EAU to Non 3270 
Write Conv to Output Only 
Erase + Conv 
Copy LDO W/CCOR CD 
Invalid Data Area or Length 
Invalid LDO Address 
Jump to Jump 
Over 100 LDOS 
Reset LDO + Other 
Invalid Request Type 
Read LDO W/CC 
Erase + Block 
SOL LDO W/CD 
Device Offline or Discon 
Invalid Reset Type 
Invalid ACB 
Invalid Exist 
Write B lock to 3270 
Read Mod or Buf Non 3270 
Copy to Non 3270R 
WRT CNV. Data Expec. 
Read Not First to 3735 
Reset Cond Illegal 
Invalid Read Mode 
Area too smal for I + I 
I Info not Available 
Int could not DET Name 
Invalid Logon SEQ Int 
CB Error in I + I 
Over Length 'Input' (Trunc) 
Int Info not Available 
Reset Cond with Lock 
DFSYN Attempt Quies. 
Resp.= Ex in RPL 
Prev Sched Unpost. 
Chain Err Mid.Lst. 
Chain Err 1st Only 
Quis. send not Req. 
Inv. Cntr. of Option 
Send in DF Reset 
Send in DF Ctl.lnv. 
Resp with Outstn. 
Chase but end Exp. 
Seq Nr not Expect. 
Resp Option Error 
Resp for Post 
Type not Support List 
Type Invalid 



RPL (ISTRPL) (Continued) 

Constants in 1STRPL (Continued) 

Label Value Meaning 



RPLOCE03 


X"42' 


RPLOCE04 


X'43' 


RPLOCE05 


Y.'W 


RPLOCE06 


X'45' 


RPLOCE07 


X'46* 


RPLOCE08 


X'47' 


RPLOCE09 


X'48' 


RPLOCE10 


X'49' 


RPLOCE11 


X'4A' 


RPLOCE12 


X'4B' 


RPLOCE13 


X'AC 


RPLOCE14 


X'4D' 


RPLOCE15 


X'4E' 


RPLOCE16 


X'4F' 


RPLOCE17 


X'50' 


RPLOCE18 


X'51' 


RPLOCE19 


X'52' 


RPLOCE21 


X'54' 


RPLOCE22 


X'55' 


RPLOCE25 


X'58' 


RPLOCE26 


X'59' 


RPLOCE27 


X'5A' 


RPLOCE28 


X'5B' 


RPLOCE29 


X'5C 


RPLOCE30 


X'5D' 


RPLOCE31 


X'5E' 


RPLOCE32 


X'5F' 


RPLOCE33 


X'60' 


RPLOCE34 


X'6T 


RPLOCE35 


X'62' 


RPLOCE36 


X'63' 


RPLOCE37 


X'64 1 


RPLOCE38 


X'65' 


RPLOCE39 


X'66' 


RPLOCE40 


X'67' 


RPLOCE41 


X'68' 


RPLVACIN 


X'69' 


RPLINVRT 


X'cA' 


RPLINVL 


X'80' 


RPLINVCF 


X'8T 


RPLIECMD 


X'87' 


RPLLGCNT 


X'88' 


RPLESCNT 


X'89' 


RPLCPCNT 


X'8A' 


RPLINDAT 


X'97' 


RPLVTAME 


X'AO' 


RPLILRS 


X'Al' 


RPLRDIP 


X'A2' 


RPLUSELE 


X'A3' 



Acquire Invalid Parm 

Appl Never Accepts 

No Preempt Auth 

Preempt has Invalid OPT 

Invalid Nib Option 

Dest Unknown 

Dest Unopenable 

Not Auth to Opndst Installation Provided Subroutin 

Failed to Provide Appl Name to Intrpret 

Dest Unavail -Offline 

Dest Unavail - In Use 

No Logon Found Accept 

Opndst Canceled 

Device/Mode Incomp. 

Invalid Mode Name 

Bhset Name Unknown 

Bhset not on Local 

Multi Bhsets Specified 

Invalid Request Type 

Appl is Quiescing 

Invalid Logon Addr or Len 

Bhset ID Refected 

Duplicate Nodes 

VTAM is Halting 

VTAM not Active 

Source Addr of CID 

CID not Resoluable 

CID DST not Opened 

No Auth for Pass 

Passer not Own Resource 

Resource not Owned 

Preempt Unopened Device 

Restore of Preempt Failed 

Bhset ID Rejected by NCP 

Invalid Setlogon 

Chnge Inv. for Sess. 

Opndst/Bind Fail. 

Invalid Action 

Inv. Response Type 

ASE Invalid LCCW Code 

ASE Invalid Chaining LCCW 

ASE Invalid Escape CMD 

Leading Graphs over 15 

ASE Escape CMD Count 

Copy LCC Count NE 3 

Inv. Area or Length 

ASE Miscellaneous 

Incompatible Sysgen 

Reset in Progress 

Miscellaneous User Error 



RPL (1STRPL) (Continued) 
Constants In ISTRPL (Continued) 



RPLCTLCF 


X'A4' 


RPLMOLTF 


X'A5' 


RPLCDITS 


X'A6' 


RPLCRNF 


X'A7' 


RPLNUTRM 


X'A8' 


RPLELNV 


X'A9' 


RPLNELNV 


X'AA' 


RPLLCH 


X'AB' 


RPLNORD 


X'AC 


RPLINVBS 


X'AD' 


RPLSEQER 


X'AE' 


RPLERNR 


X'AF" 


RPLOLIPX 


X'BO' 


RPLCPYE2 


X'Bl' 


RPLRELNP 


X'B2' 


RPLCPYE1 


X'B3' 



Meaning 

ASE Control Command 

ASEOItt Failure 

ASE Conflicting Dialog 

Conv. Reply not Possible 

ASE no Uterm Rdte 

ASE Escape LCCW 

ASE Non-Escape LCCW 

ASE LCCW Count G255 

Read not First to BSC Dial in 

ASE Invalid BTU Resp 

ASE RSP SEQ Err 

ASE Expected RSP not Received 

Overlengfh Input (Trunc) 

Copy Wrong Cluster 

Reset Lock not Allowed 

Copy Unopened from Device 



Equates for RPLFDB2 if RPLRTNCD = X'10' 



RPLRCWNP XW 

RPLYTCTN X'80' 

RPLYADIF X'84" 



Reset C was Noop 
Yielded to Contention 
Yielded + Dialog Init Failui 



Reason Code equates for RPLFDB2 if RPLRTNCD = X'14' 
RPLSTALF X'Ol' Storage Allocation Fallur 

Reason Code equates for RPLFDB2 if RPLRTNCD = X'18 1 



RPLUSRES 


X'OO' 


User Reset 


RPLRSTSR 


X'OO' 


Resertsr 


RPLSSTRM 


X'OT 


Successful TRM Reset 


RPLUNTRM 


X'02' 


Unsuccessful TRM Reset 


Reason Code 


equates for RPLFDB2 if RPLRTNCD = X'lC 


RPLNCPAO 


X'Ol' 


NCP Abend = Restart OK 


RPLNCPAN 


X'02" 


NCP Abend = Restart NOK 


RPLPCF 


X'03' 


Perm Channel Failure 


RPLANS 


X'04' 


Auto Network Shutdown 


RPLAPPAB 


X'05' 


ASE Appl Abended 


RPLCLOCC 


X'06' 


CLSDST Occurred 


RPLVOFOC 


X'07' 


Vary Offline Occurred 


RPLDISCO 


X'08' 


Disconnect Occurred 


RPLBTHEX 


X'09' 


Buffer Threshold Exceeded 


RPLCLRED 


X'OA' 


Register Cleared 


RPLCPAOL 


X'81' 


Last Operation Purged for NCP Abend - Restart OK 



Reason Code equates for RPLFDB2 if RPLRTNCD = X'24' 



RPLOCS01 X'Ol' 

RPLOCS02 X'02' 

RPLOCS03 X'03' 



ASE Unexpected Error 

ASE Srt not Present 

ASE Controlling Mode Offline 



Dec Hex 




ORG SNTENTRY 



ORGSNTWORDl 



SNTFLAG 
Flag byte 



SNTNENTS 
Number of entries in this SNT 



SNTRSRVD 
Reserved to force DWORD BDY 



ORG SNTWORD 1+1 



ORG SNTENTRY + 



SNTENTRY 
SNT entry 



SNTWORD 1 
Flag and pointer field 



SNTCBPTR 
FTR to DNCB, ICNCB, LDNCB, ETC 



SNTLOCK 

This will be snt addr when add is done by 

SSCP for Dummy RDTE 



Alphabetical List of Fields in ISTSNT 

Field Dec Hex Field 

SNTCBPTR 0009 0009 SNTLOCK 

SNTENTRY 0008 0008 SNTNENTS 

SNTFLAG 0008 0008 SNTRSRVD 

Flag Meanings 

Hex 

Disp Flag Byte Contents 



0008 SNTFLAG Flag Byte 



0012 000C 
0000 0000 
0004 0004 


SNTWORD1 


0008 0008 


Bit 
Pattern 


Pattern 
Name 


Pattern 
Meaning 



1 SNTRDTFG RDT Entry Flag, 

1 = RDTE, = NCB 
.1 SNTSNTFG This SNT Entry Contains 

a Pointer to an SNT 

Entry 
. . 1 SNTDUMFG This is SNT for a Dummy 

RDTE it is never Locked 
...1 1111 SNTRSVFG Reserved 



Dec 




1 1 


2 


3 


THRLAG1 
TH flag byte 


THDAP 
Destination address 


THOAF 
Original address 


THSNF 
Sequence number 


X THDCF 
Data count 







First Byte of 
THFLAG1 



THFLGB 

Header Flag 

Fields 



Alphabetical List of Fields in ISTTH 
Field Dec Hex Field 



THDAF 0002 
THDCF 0008 
THFLAG1 0000 



Flag Meanings 

Flag Byte 



Hex 
Disp 



0000 



0001 THFLGB 



0002 THFLGB 0001 0001 

0008 THOAF 0004 0004 

0000 THSNF 0006 0006 



Bit Pattern 

Contents Pattern Name 

First Byte of THF LAG 1 1111.... THFID 

.... 1111 THFLGA 

.... 11.. THMPF 

.... 1... THRHI 

1.. THCMPLI 

1. THPSI 

1 THAFI 

Header Flag Fields 1111 .... THPYF 
.... 11.. THSEF 
11 THCDF 



Pattern 
Meaning 

Format ID 

Header Bit Flags 

Mapping Field 

RH Included Indicator 

RU Complete Indicator 

Primary-Secondary 

Indicator 

Expedited Flow Indicator 

Priority 
Security 
Reserved 



TH (ISTTH2) 



| 1 


2 


3 


TH2FLAG1 
Flag Bytes 


TH2DAF 

Destination 

Address 


TH20AF 
O.igin Address 


TH25NF 
Sequence Number 







First Byte of 
TH2FLAG1 



Org TH2FLAG1+1 



Second Byte of 
TH2FLAG1 



Alphabetical List cf Fields in ISTTH2 



TH2DAF 0002 0002 

TH2FLAG1 0000 0000 



TH20AF 
TH2SNF 



0003 
0004 



0003 
0004 



Disp 
0000 



First Byte of TH2FLAG1 1111 



Second Byte of 
TH2FLAG1 



Constants in ISTTH2 
Label Value 

Values for Format ID Field 



Bit 


Pattern 


Pattern 


Pattern 


Name 


Meaning 


1111 .... 


TH2FID 


Format ID 


.... 11.. 


TH2MPF 


Mapping Field 


.... 1... 


TH2RHI 


RH Included Indicator 


1.. 


TH2CMPLI 


RU Complete Indicator 


1. 


TH2PSI 


Primary-Secondary 
Indicator 


1 


TH2AFI 


Expedited Flow Indicator 


1111 .... 


TH2PYF 


Priority Field 


.... 11.. 


TH2SEF 


Security Field 


11 


TH2CDF 


Reserved 



THFID0 


B'0000' 


FIDO 


THFID1 


B'ooor 


FID 1 


THFID2 


B'OOIO' 


FID 2 



TH (ISTTH2) (Continued) 



Constants in ISTTH2 (Continued) 

Values for Mapping Field 
THCNOSEG B'll' 

THONLY B'll' 

THFIRST B'10" 

THMIDLE B'OO' 

THLAST B'OT 



No Segmenting 
Only Segment 
First Segment 
Middle Segment 
Last Segment 



Values for Primary -Secondary Indicator 



THCPTOS B'l' 

THCSTOP B'O" 

Values for Priority Field 
THCNOPYF B'OOOO' 

Values for Security Field 
THCNOSEF B'OO' 

Values for Code Definition Field 
THCNOCDF B'OO' 

Standard Values for Flag Bytes 

THSYNREQ X'lCOO' 

THASYREQ X'lDOO' 

THSYNRES X'lEOO' 

THASYRES X'lFOO' 



Primary to Secondary Flow 
Secondary to Primary Flow 



No Code Definition 



Normal Request 
Expedited Request 
Normal Response 
Expedited Response 



TIE 


(ISTT 

He 


4 
8 
C 

4 

8 

C 


E) 










Dec 







1 


2 


3 





TIETYPE 
Control block 
type code 


TIELNGTH 
Length in 
bytes 


TIERETCD 
Return code from 
TOLTEP 


TIEREQ 
Tie usage code 


4 


TIETIEA 
Address of next tie 


8 


TIESNA 
Address of symbolic name 


12 


TIERPHA 
Address of RPL header 




Or 


g TIETIEA 






4 




First Byte of 
TIETIEA 






Or 


g TIESNA 




8 




TIEPTR1 
First Pointer 




Or 


g TIERPHA 






12 




TIEPTR2 
Second Pointer 



Alphabetical List of Fields 



Field 



Dec Hex Field 



Dec Hex Field 



TIELNGTH 0001 0001 TIERETCD 

TIEPTR1 0008 0008 TIERPHA 

TIEPTR2 0012 000C TIESNA 

TIEREQ 0003 0003 TIETIEA 



0002 0002 TIETYPE 
0012 000C 



Dec Hex 
0000 0000 



Flag Meanings 






Hex Bit 


Pattern 


Pattern 


Disp Contents Pattern 


Name 


Meaning 


0004 First Byte of TIETIEA 1 


TIEGATE 


Gating Flag 


Constants in ISTTIE 






Label Value Meaning 






TITYPE X'18' Type Code for TIE 







TIE (ISTTIE) (Continued) 
Constants in ISTTIE (Continued) 



TIE Usage 


Codes 


TIEREQO 





TIEREQ1 


1 


TIEREQ2 


2 


TIEREQ3 


3 


TIEREQ4 


4 


TIEREQ5 


5 


TIEREQ6 


6 


TIEBASIC 





TIERCRD 


4 



RFT REQ Passed to TOLTEP 

Vary Passed FSB to TO LTEP 

Vary Passed NCSPL to TOLTEP 

Req. for an End-CTL to Vary 

Req. for Freeing Buffers 

TOLTEP REQ Info from SSCP 

TOLTEP Pass LCPB to Vary 

Basic Support for Device RFT Received for 

Record Support for Device RFT Received for 



The following sen/ice aids are available for VTAM: 

. Buffer Trace 

. I/O Trace 

. Line Trace 

. NCP Dump 

. VTAM Dump Facility 

A complete description of these and other relevant service aids can be found in the 
DOS/VS VTAM Debugging Guide, GC27-0021. 



CHAPTER III 

VSAM CONTROL BLOCKS 



VSAM CONTROL BLOCK STRUCTURE FOR A KEY-SEQUENCEP DATA SET 
User's record management request: VSAM user: 



GET,PUT,POlNT,ERASE,or ENDREQ 






! DTFIS 


DTFIS 


' 




X'll' LOGMODAD 


X'2C AMDTFAD 


X'30' CIPROCAD 



X'90' ACBAD 



X'9C DTFISAD 



Note: Present only if 
using IIP 



DOS/VS 
COMREG 





IIPPRCPR 




Branch vector 




Address table 





1 



Describes the VSAM 
record processing 
request 



"ix'18' tACB 



Describes the VSAM 
♦{data set 



X'04' t AMBL 



X'08' 1 Record 
management 
load module 



X'30' f EXLST 



X'04' 

t Data AMDSB 
X'08' 

t Index AMDSB 
X'OC 

t PLH's 

X'14' 

t ACB 

X'40' 

t Exclusive Ctrl list! 



User exit routin 



t LERAD 



t EXCPAD 



See figure: 
Data and index 
' control block 



DATA AND INDEX CONTROL BLOCK STRUCTURE 



AMBL 






Data AMDSB 




EDB 




EDB's 




Describes an opened 
cluster 




Statistical 
information 




Describes a disk extent 
(1EDB for each extent) 




P 




\ 
























J_ 




1 






X'04' 
+ Data AMDSB 


X'CO' 

t EDB 


X'OO' 
tNoxtEDB 


1 














X'08' 
t Index AMDSB 




X'24' 

t ARDB 








X'14' 
ILPMB 


Data ARDBs 














Space allocation Info 
(RBA) for each key 
range 


| 


X'OC 
tPLH's 






X'AC 

t BCB 






X'18' 
tARDB 








+ 
















X'14' 
♦ ACB 


X'B4' 

t CCW build area 








X'OC 

t EDB 








X'40 1 
t Exclusive Ctrl list 










LPMB 




X'14' 

t Index ARDB 






Describes physical 
disk attributes 




X'50' © 
1 PLHs of base cluste 




1 " "" 


















Information about 
current request 






1 




X'54' © 
t USB 


























BUJS 


1 






t RPLt 




Data BHD 






Status info about a 
buffer(l for each buffer) 








Information about 
buffers 
















Index AMDSB 




t ECB 




f, 




Same control block 
structure as data 
AMDSB 




X'04' 
^ Buffer 


t Current ARDB 






X'14 1 
i Buffer queues 










X'44 1 

f next BCB in queue 


X'114' 

1 BHD 








» 












II 




The base cluster AMBL 
points to the USB. The 
AIX AMBLs points to the 
PLHs of the base cluster. 


t Current BCB 






Data tree / data l/U queue 


1 I 






BCB 




1 


f Current buffer 
t THB 






Buffers 














BCB 


'1 






1 
















1 



MULTIPLE STRING CONTROL BLOCK STRUCTURE 



Rl during 
execution of 
subtask 1 



Rl during 
execution of 
subtask 2 



* RPL2 








Rl during 
execution of 
subtask n 




RPLn | 


1 RPLn 









T PLH 



Note: PLH1 is not permanently assigned to RPL1, etc. 
PLHs are assigned as required. 



CATALOG MANAGEMENT CONTROL BLOCKS 



t Label cylinder info 



t DADSM 

parameter list 



-<S> 



f ACB (current) 



i catalog record 
in a buffer 



1 's to fields ii 
the buffer 



f Next available 
space in work area 



t CMS work area 



t CRA definition 
work area 



t CRA buffer chain 



-© 



*■ 256-byte label record 



DADSM parameter list 



L*> Volume identifier 



j Label cylinder info, 



VTOC information 



ACB (Master catalog) 



Describes the catalog 
as a VSAM key- 
sequenced data set 



RPLs (Master catalog) 



P 



Describes the VSAM 
record processing 
request 



DOS/VS_ 



AMCBS 



Interface between 
ANCHTand the VSAM 
catalog control 
blocks 



I CAXWA chaii 



's control blocks -i^. 

and work areas 
needed for catalog 
processing 



® 

(£) \ See fig.: CALLER-SUPPLIED 
^n CONTROL BLOCKS 

^J F^OR CATALOG — 

MANAGEMENT 



Control blocks for further 
catalogs and CRAs (if present) 



RPLs (job catalog) 



ACB(e.g.user catalo g) 



RPLs(e.g. userc 



RPLs (e.g. CRA) 



CALLER-SUPPLIED CONTROL BLOCKS FOR CATALOG MANAGEMENT 



yy - ■ ■ 






* 


t Field name 
















t CPL 






t F PL for test 






CPL 








* Field's data 












®- 


t Catalog 
identifier 








Vs to user-supplied 
information fields and 
lists 




I Catalog record 
identifier 
















t Work area 




FPL 




4 Password 










t Field name 




t FVT 






















4 FPL=0: 




Information for 
locating the CRA 




4 Field name 
Test condition 








♦ Work area: 
Update data or field's 
(retrieved) data and 
length 




t FPL 










t FPL 




t FPL=0: 
no more tests, or 
t FPL for next 
test 
















Work area 








t Test data 






* 


Field's data 




















Field's data 
















<&> 


Available space 




-* 







FVT (data) 



FVT (index) 



FVT (space) 



I ^ 



X S o 



8 7T 



ACCESS METHOD BLOCK LIST (AMBL) 



Displacement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 












AMBLST 




Beginning of AMBL 




1 




1 


2 

1 


AMBL ID 
AMBLACT 


x'ir 


AMBL identifier 
AMBL active byte 


2 


2 


2 


AMBLLEN 




Length of control block 


4 


4 


4 


AMBLDTA 




Pointer to data AMDSB 


8 


8 


4 


AMBL IX 




Pointer to index AMDSB 


12 


C 


4 


AMBLPLHF 




Pointer to first PLH 


16 


10 


4 


AMB CHAIN 




Reserved 


20 


14 


4 


AMBLACB 




Pointer to ACB 


24 


18 


2 


AMBLPLHL 




Length of PLH 


26 


1A 


1 


AMBLPLHN 




Total number of strings 


27 


IB 


1 


AMBLFLAG 




Flag byte 








AMBLPOST 


X'80" 


POST must be issued 


28 


1C 


4 


AMB AMB UF 




Size of buffer space 


32 


20 


2 


AMBMACRF 
AMBMACR1 




Flags (copy of flags in 
ACBMACR1 and 
ACBMACR2) 
First byte: 








AMBKEY 


X'80' 


Access data via index 








AMB ADD 


X'40' 


Access without index 








AMBADR 


X'40' 


Access without index 








AMBCNV 


X'20' 


Control interval processing 








AMBSEQ 


X'10' 


Sequential processing 








AMBDIR 


X'08' 


Direct processing 








AMB IN 


X'04' 


GET, READ processing 








AMBOUT 


X'02' 


PUT, WRITE processing 








AMBUBF 


x'or 


User buffers 








AMBMACR2 




Second byte: 








AMBSKP 


X'20' 


Skip sequential accessing 








AMBRST 


X'10" 


Reusable Data Set 








AMBAIX 


X'08" 


AIX processing 








AMBOPEN 


x'or 


Open is in process 


34 


22 


2 


AMBLTLEN 




Length of GETVIS for 
AMBL, PLH, etc. 


36 


24 


2 


AMBDBUF 




Number of data buffers 


38 


26 


2 


AMBIBUF 




Number of index buffers 


40 


28 


4 


AMBLOPWA 




Pointer to open work area 


Split Control 


44 


2C 


4 


AMBSECB 




Split/speudo-split ECB 


44 


2C 


1 


AMBS0 




Reserved 


45 


2D 


1 


AMBS1 




Reserved 


46 


2E 


1 


AM3SC0M 




ECB post byte 








AMBSWAIT 


X'80' 


Wait bit share 


47 


2F 


1 


AMBSECBT 




Share gate test and set byte 


48 


30 


4 


AMBBECB 




ECB fo Buffer Manager 


48 


30 


1 


AMBB0 




Reserved 


49 


. 31 


1 


AMBB1 




Reserved 


50 


32 


1 


AMBBCOM 




ECB Post byte 








AMBBWAIT 


X'80' 


Wait bit-buffer manager 



ACCESS METHOD BLOCK LIST (AMBL) (. . .Continued) 



Displacement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




51 


33 




AMBBECBT 




Buffer gate-test and 
set byte 


52 


34 


4 


AMBLORBA 




Low RBA of control area 
being split 


56 


38 


4 


AMBHIRBA 




High RBA of control area 
being split 


60 


3C 


4 


AMBPLH 




Address of PLH in control 


Pointers 


64 


40 


4 


AMBALIST 




Exclusive control list 
address 


68 


44 


4 


AMBLRPLS 




Address of RPL causing split 


72 


48 


4 


AMBLCLWA 




Pointer to close work area 


76 


4C 


4 


AMBLCIWA 




Pointer to CI split work 
area 


80 


50 


4 


AMBLBC 




Pointer to base cluster 


84 


54 


4 


AMBLUSB 




Pointer to USB 


88 


58 


4 


AMBBCACB 




Pointer to BC-ACB 


92 


5C 


4 


AMBPEACB 




Pointer to PE-ACB 


96 


60 


4 






Reserved 



ACCESS METHOD CONTROL BLOCK (ACB) 



Displacement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










1 


ACBID 




ACB identifier = 'A0' 








ACBIDD 


X'AO' 


ACB equate 








ACBIDVAL 


X'AO' 


ACB equate 


1 


1 


1 


ACBACT 




Active byte test and set 
X'OO' VSAM Release 1 
XMO' VSAM Release 2 
X'20' VTAM 


2 


2 


2 


ACBLEN 




Length of ACB in bytes 


2 


2 


2 


ACBLENG 




Length of ACB in bytes(l) 


4 


4 


4 


ACBAMBL 




Address of the AMBL 


8 


8 


4 


ACBAMO 




Pointer to VSAM code 


12 


C 


2 






Reserved 


14 


E 


2 


ACBDBUF 




Number of data buffers 


14 


E 


2 


ACBBUFND 




Number of data buffers 


16 


10 


2 


ACB1BUF 




Number of index buffers 


16 


10 


2 


ACBBUFN1 




Number of index buffers 


18 


12 


2 


ACBMACRF 




MACRF 


18 


12 


1 


ACBMACR1 




MACRF first byte 








ACBKEY 


X'80' 


Access data via index 








ACBADD 


XMO' 


Access without index 








ACB ADR 


X'40 1 


Access without index 








ACBCNV 


X'20' 


Control interval processing 








ACBSEQ 


X'10" 


Sequential processing 








ACBDIR 


X'08' 


Direct processing 








ACB IN 


X'04' 


GET 








ACBOUT 


X'02' 


PUT 








ACBUBF 


X'OT 


User buffers 


19 


13 


1 


ACBMACR2 


X'80' 
X'40' 


MACRF second byte 

Reserved 

Reserved 








ACBSK1P 


X'20' 


Skip sequential access 








ACBRST 


X'10' 


Reusable data set 








ACBAIX 


X'08' 
X'04' 
X'02' 
X'01' 


AIX processing 

Reserved 

Reserved 

Reserved for open AMBL 


20 


14 


1 


ACBDOSID 




DOS DTF identifier 








ACBDTFID 


X'28" 


DTF type for VSAM 


21 


15 


1 


ACBOFLGS 




Open/close flags 








ACBVOLMT 


X'80' 


Verify volume mounted 








ACB VMS G 


X'40' 


Message requested bit 








ACBEOV 


X'20" 


EOV detects completed 








ACBOPEN 


XMO 1 


ACB is open 








ACB CAT 


X'08' 


ACB for VSAM catalog 








ACBEXFG 


X'04' 


User exit flag 








ACBKEYOK 


. x'cr 


Key processing all right 
for this ACB 


22 


16 


1 


ACBNST 




Number of strings 


22 


16 


1 


ACBSTRNO 




Numbsr of strings 


23 


17 


1 


ACBERFLG 




Error flags 



(1) If specified length id too s 
built (X'OO 1 in byte 1). 



lall for a VSAM Release 2 ACB a Release 1 ACB is 



ACCESS METHOD CONTROL BLOCK (ACB) (. . .Continued) 



Displacement 


Bytes 


Field Name 


Hex 


Description 


Dec Hex 






Digit 












Open error return codes : 






ACBOALR 


X'04' 


This ACB is already open 






ACBOLLUB 


X'OE' 


The symbolic unit in the 
DLBL statement is invalid 






ACBONJIB 


X'OF' 


No job information blocks 
(J IBs) are available from 
the label information 
cylinder. 






ACBOLIGN 


X'lT 


The address in the 
ASSIGN statement for the 
logical unit was IGN 
(assignment ignored). 






ACBOLUNA 


X'12' 


The address in the 


| 






ASSIGN statement for the 








logical unit was UA 


! 






(logical unit unassigned). 


I 


ACBOCEXT 


X'22' 


The volume serial numbers 


i 




specified in the EXTENT 






statement do not match 


' 






those specified in the 










catalog entry. 






ACBOCDLD 


X'32' 


Unable to load VSAM 
modules via a CDLOAD 






ACBONMNT 


X'50 1 


Attempt to mount two 
volumes on the same drive 
when direct or keyed 
processing was specified. 
Or the operator failed to 
mount the volume. 






ACBONCRA 


X'5C 


CRA volume not mounted 






ACBOIERR 


X'60' 


Unusable input data set 






ACBOUEMP 


X'64' 


Empty upgrade AIX 






ACBOTMST 


X'68' 


The time stamp of the 
volume on which a data 
set is stored doesn't match 
the system time stamp in 
the volume catalog entry. 






ACBOTIME 


X'6C 


The system time stamp of a 
data set and its index do 
not match, this indicates 
that the data has been up- 
dated separately. This 
test is greater than or 
equal, i.e., no warning 
is given if the index time 
stamp is greater than the 
data time stamp. 






ACBOEMPT 


X'6E' 


Open empty data set for 
read only. 



ACCESS METHOD CONTROL BLOCK (ACB) (...Continued) 



Displacement 
Dec Hex 



Bytes 



ACBODSNC 
ACBODEVT 



X'74' 
X'75' 



Data set was not closed the 
last time it was processed 
The symbolic unit specified 
in the EXTENT statements 
is not a valid VSAM 
device type. 
The DLBL statement is 
missing or the filename in 
the DLBL doesn't match the 
ACB. 

A permanent I/O error 
occurred while VSAM was 
reading label information 
from the label information 
cylinder. 

Not enough virtual storage 
space is available in the 
partition for work areas, 
control blocks, or buffers. 
A permanent l/O error 
occurred while VSAM was 
reading or writing a 
catalog entry. 
CATX'94' found in the 
catalog for this ACB. 
Security verification failed; 
the password specified in 
the ACB for a specific level 
of access doesn't match the 
password in the catalog for 
that level of access. 
The operands specified in 
the ACB are inconsistent 
with each other or with the 
information in the catalog 
entry, for example, an open 
of an ESDS for keyed 
processing. 

User-specified buffers with 
keyed access (user buffers 
can be specified only with 
CNV access). 
A permanent I/O error 
occurred while VSAM was 
reading the volume label of 
the volume the data is set on 
The data set is not available 
because it is being updated 
by (under the exclusive 
control of) another ACB or 
has been exported by 
Access Method Services. 



ACCESS METHOD CONTROL BLOCK (ACB) (. . .Continued) 



Displacement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










ACBONOCT 


X'B4' 


The VSAM catalog is not 
connected to the system 
on logical unit SYSCAT. 








ACBOACT 


X'BC 


ACB was active 








ACBOOERR 


X'CO' 


Unusable output data set 








ACBOPEMP 


X'C4' 


Access via empty path 








ACBODSCB 


X'C8' 


DSCB format 4 error 








ACBOCNVP 


X'EO' 


Invalid control interval 
procedure 








ACBONRST 


X'E8' 


Non-reusable is not empty 








ACBOCTER 


X'FF' 


Unexpected return from 
catalog locate function. 

Close error return codes: 








ACBCALR 


X'04' 


ACB already closed 








ACBCNVRT 


X'88' 


Insufficient space available 
in user's partition for 
work area 








ACBCIOCA 


X'90' 


Permanent I/O error 
occurred while VSAM was 
reading or writing a 
catalog entry. 








ACBCNCAT 


X'94' 


No catalog entry found 








ACBCIOER 


X"B8' 


Permanent I/O error 
occurred while VSAM was 
completing outstanding 
I/O requests. 








ACBCBUSY 


X'BC 


ACB busy 


24 


18 


4 


ACBAMBUF 




Length of buffer pool 


28 


1C 


8 


ACBDDNM 




DDname 


36 


24 


4 


ACBPRTCT 




Pointer to password 


40 


28 


4 


ACBUAPTR 




Pointer to user work area 


44 


2C 


4 


ACBBFPL 




Pointer to first data buffer 
in buffer pool 


48 


30 


4 


ACBEXLST 




User exit list pointer 


52 


34 


4 


ACBNXT 




Reserved 


56 


38 


1 






Reserved for BSTRNO 


57 


39 


1 


ACB INF LG 




Catalog recovery flag byte 








ACBSCRA 


X'80' 


CRA flag system 








ACBUCRA 


X'40' 
X'20' 
X'10 1 
X'08' 
X'04' 
X'02' 

x'or 


CRA flag user 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 


58 


3A 


2 


ACBMSGLN 




Message area length 


60 


3C 


4 


ACBMSGAR 




Message area 


64 


40 


4 


ACBMLOAD 




CBM module load address 



ACCESS METHOD CONTROL BLOCK STRUCTURE BLOCK (AMCBS) 



Disp 


acement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 






1 




1 


1 
1 


CBS ID 
CBSFLAGS 


X'00' 


AMCBS identifier 
AMCBC flags 








CBSJCAT 


X'80' 


Job catalog not present 


2 


2 


4 


CBSSIZ 




Length of the AMCBS 


4 


4 


4 


CBSCRACB 




Pointer to CRA ACB 


8 


8 


4 


CBSACB 




Pointer to ACB (Master) 


12 


C 


4 


CBSCRAPL 




Pointer to AMS 
CRAAP list 


16 


10 


4 


CBSSYSUC 




Pointer to job catalog 
ACB 


20 


14 


4 


CBSCAXCN 




Pointer to CAXWA 
chain 



ACCESS METHOD DATA STATISTICS BLOCK (AMDSB) 



Displacement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










96 


AMDSBCOM 




Common part 




1 


1 

1 


1 
1 


AMDSBID 
AMDATTR 
AMDATTR1 


X'60' 


AMDSBidentifier 
Attributes of the data set 
Attributes (first byte) : 








AMDDST 


X'80' 


Key-sequenced data 
set 1 

Entry-sequenced data 






















setO 








AMDWCK 


X'40' 


Check each record when 
it is written 








AMDSDT 


X'20' 


Sequence set is stored 
with the data 








AMDREPL 


X'10' 


Replication 








AMDORDER 


X'08' 


Use the volumes in the 
same order as the 
volume list 








AMDRANGE 


X'04' 


The data set is divided 
into key ranges 








AMDRRDS 


X'02' 


Relative record data set 








AMDSPAN 


x'or 


Spanned records 


2 


2 


2 


AMDLEN 
AMDAXRKP 




Length of AMDSB in the 

catalog 

Index section 


6 


6 


2 


AMDRKP 




Relative key posit ion 


8 


8 


2 


AMDKEYLN 




Key length 


10 


A 


1 


AMDPCTCA 




Percentage of free 
control intervals in the 
control area 


11 


B 


1 


AMDPCTCI 




Percentage of free bytes 
in the control interval 


12 


C 


2 


AMDCIPCA 




Number of control 
intervals in a control 
area 


14 


E 


2 


AMDFSCA 




Number of free control 
intervals in a control 
area 


16 


10 


4 


AMDFSCI 




Number of free bytes in 
a control interval 


20 


14 


4 


AMDCINV 




Control interval size 


24 


18 


4 


AMDLRECL 




Maximum record'size 


28 


1C 


4 


AMDHLRBA 




RBA of the high-level 
index record 


28 


1C 


4 


AMDNSLOT 




Number of relative 
record slots 


32 


20 


4 


AMDSSRBA 




RBA of first seq. record 


32 


20 


4 


AMDMAXRR 




Max. relative record 
number 


36 


24 


4 


AMDPARDB 




Pointer to first ARDB 



ACCESS METHOD DATA STATISTICS BLOCK (AMDSB) (. . .Continued) 



Displacement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




40 


28 


1 


AMD ATT R3 




Attributes 








AMDUNO 


X'80 
X'40 
X'20 
X'10 
X'08 
X'04 
X'02 
X'01 


0=unique; l=non-unique 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 


41 


29 


3 






Reserved 


44 


2C 


4 






Reserved 


Statistics 


48 


30 


4 


AMDSTAT 




Statistics 


48 


30 


8 


AMDSTMST 




System time stamp 


48 


30 


8 


AMDSTSP 




System time stamp 


56 


38 


2 


AMDNIL 




Number of index levels 


58 


3A 


2 


AMDNEDB " 




Number of EDBs 


58 


3A 


2 


AMDNEXT 




Number of extents in the 
data set 


60 


3C 


4 


AMDNLR 




Number of user-supplied 
(logical) records in the 
data set 


64 


40 


4 


AMDDELR 




Number of deleted records 


68 


44 


4 


AMD1REC 




Number of inserted records 


72 


48 


4 


AMDUPR 




Number of updated records 


76 


4C 


4 


AMDRETR 




Number of retrieved 
records 


80 


50 


4 


AMD AS PA 




Number of bytes of free 
space in the data set 


84 


54 


4 


AMDNCIS 




Number of times a control 
interval was split 


88 


58 


4 


AMD N CAS 




Number of times a control 
area was split 


92 


5C 


4 


AMDEXCP 
AMD CO MM 




Number of times EXCP was 
issued by VSAM I/O 
routines 


General Continue 


96 


60 


1 


AMDS HO PT 




Share option byte 








AMDSHR1 


X'80 


Share option 1 








AMDSHR2 


X'40 


Share option 2 








AMDSHR3 


X'20 


Share option 3 








AMDSHR4 


XM0 


Share option 4 


97 


61 


4 


AMDCDSN 




Pointer to catalog ACB 


101 


65 


3 


AMDDSN 




Catalog control interval 
number for data (index) 


104 


68 


4 


AMDHWRBA 




High-water RBA for the 
data set 



ACCESS METHOD DATA STATISTICS BLOCK (AMDSB) (. . .Continued) 



Displacement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




108 


6C 


1 


AMDATTR2 




Attributes (second byte): 








AMD RE L 


X'80' 


Release unused space 








AMD LOAD 


X'40' 


Load mode 








AMDSPEED 


X'20' 


Speed option 








AMDINDX 


X'10' 


Index option 








AMDSHR 


X'08' 


Sharing 








AMDKR 


X'04' 


Key-range processing, 
duplicate of 
AMD RANGE 








AMDCAT 


x'or 


AMDSB for catalog 


109 


6D 


.1 


AMDACT 




AMDSB test and set byte 


110 


6E 


..2 


AMDFILT 




User area (ISAM 
compatibility) 


112 


70 


4 


AMDPVOL 




Pointer to volume list 


116 


74 


1 


AMDAMS 




AMS flag byte 








AMDAIX 


X'80' 


Alternate index 








AMDPATH 


X'40' 


Access via path 








AMDBASE 


X'20' 


Access via base 


117 


75 


1 






Reserved 


118 


76 


2 


AMDAIRKP 




AIX relative key 
position 


Local Statistics 


120 


78 


4 


AMDLSTAT 




Local statistics 






2 


AMDLNIL 




Local number of index 


122 


7A 


..2 


AMDLNEST 




Local number of entries 
in the index section 


124 


7C 


4 


AMDLNLR 




Local number of user- 
supplied (logical) records 


128 


80 


4 


AMDLDELR 




Local number of deleted 
records 


132 


84 


4 


AMDLIREC 




Local number of inserted 


136 


88 


4 


AMDLUPR 




Local number of updated 
records 


140 


8C 


4 


AMDLRETR 




Local number of retrieved 
records 


144 


90 


4 


AMDLASPA 




Local bytes of free space 


148 


94 


4 


AMDLNCIS 




Local number of control 
interval splits 


152 


98 


4 


AMD LN CAS 




Local number of control 
area splits 


156 


9C 


4 


AMDLEXCP 




Local number of EXCPs 
issued hy VSAM I/O 
routines 


Exceptional Exit 


160 


A0 


8 


AMDEXEXT 




Exception exit 



ACCESS METHOD DATA STATISTICS BLOCK (AMDSB) (. . .Continued) 



Displa 


cement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




Buffer Management Information 


168 


A8 


2 


AMDBCBNO 




Number of buffers 


170 


AA 


2 


AMDBFREE 




Number of unassigned 
buffers 


172 


AC 


4 


AMDFSBCB 




Address of the first 
BCB 


176 


BO 


4 


AMDFFBCB 




Address of the first 
free BCB 


180 


B4 


4 


AMDCCWA 




Pointer to CCW build 


184 


B8 


8 


AMDCCWA 




Reserved 


EDB Header 


192 


CO 


4 


AMDFSEDB 




Address of first EDB 


196 


C4 


2 






Reserved 


198 


C2 


..2 


AMDLEDB 




Length of EDB 



ACCESS METHOD DEFINE THE FILE (AMDTF) TABLE 



Displacement 


Bytes 


Field Name 


Hex 
Digit 


Description 


Dec 


Hex 








72 


SAVARPP 




Used to store register 
contents of problem 
program 


72 


48 


72 


SAVARCI 




ISAM interface 
program save area 


144 


90 


4 


ACBAD 




Address of ACS] Used 
by 
UlPOPEN 
to open 


148 


94 


4 




X'OA020000' 


SVC 2 J the ACB 


152 


98 


4 


RPLAD 




Address of RPL 


156 


9C 




EREPL 




Error exit parameter list 


156 


9C 


4 


DTFISAD 




Address of DTFIS 


160 


A0 


4 


EPLRECAD 




Address of record in 
error (not supported by 
IIP) 


164 


A4 


8 


EPLDASDA 




DASD address of record 
in error (not supported 
by IIP) 


172 


AC 


1 


EPLRECID 




Record identification 








EPLRECID 


X'80' 


Data record (VSAM 
data set) 








EPLXREC 


X'40' 


Index record (VSAM 
sequence set) 








EPLCXREC 


X'20' 


Cylinder index record 
(VSAM index set) 








EPLMXREC 


X'10' 


Master index record 
(VSAM index set) 








EPLREAD 


X'02' 


Read 








EPLWRITE 


x'or 


Write 


173 


AD 


1 


EPLCMNDC 


X'OO" 


Command code of 
failing CCW (not 
supported by IIP) 


176 


BO 




GENACB 




GENCB information to 
generate the ACB 


176 


BO 


4 


GACBHAD 




Address of header 


180 


B4 


4 


MACRFEAD 




Address of MACRF 
element 


184 


B8 


4 


FILENEAD 




Address of filename 
element 


188 


BC 




GACBH 




Header 


188 


BC 


1 


GACBBTC 


X'AO' 


Block-type code (ACB) 


189 


BD 


1 


GACBFTC 


x'or 


Function-type code 
(GENCB) 


190 


BE 


2 


GACBNOC 


x'ooor 


Number of copies 
(1 copy) 


192 


CO 


4 


GACBWAAD 




Address of work area 
set to 0; VSAM obtains 
space via GETVIS 


196 


C4 


4 


GACBWALN 


X'OO' 


Length of work area 



ACCESS METHOD DEFINE THE FILE (AMDTF) TABLE (....Cont'd) 



Displacement 


Bytes 


Field Name 


Hex 
Digit 


Description 


Dec 


Hex 


200 


C8 




MACRFEL 




MACRF element 


200 


C8 


4 


MACRFKTC 


X'OO 120000' 


Keyword-type code 


204 


CC 


4 


MACRFVAL 




Value supplied by 
IIPOPEN 


208 


DO 




FNAMEEL 




File name (DDname) 
element 


208 


DO 


4 


FNAMEKTC 


X'00090000' 


Keyword-type code 


212 


D4 


8 


FNAMEACB 




File name (inserted 
by IIPOPEN) 


220 


DC 




GENRPL 




GENCB information 
to generate the RPL 


220 


DC 


4 


GRPLHAD 




Address of header 


224 


E0 


4 


ARLNEAD 




Address of AREALEN 
element 


228 


E4 


4 


ACBEAD 




Address of ACB element 


232 


E8 


4 


KEYLNEAD 




Address of KEYLEN 


236 


EC 


4 


RECLNEAD 




Address of RECLEN 
element 


240 


F0 




GRPLH 




Header 


240 


F0 


1 


GRPLBTC 


X'CO' 


Block-type code (RPL) 


241 


Fl 


1 


GRPLFTC 


X'OT 


Function-type code 
(GENCB) 


242 


F2 


2 


GRPLNOC 


x'ooor 


Number of copies 
(1 copy) 


244 


F4 


4 


GRPLWAAD 




Address of work area 
set to 0; VSAM obtains 
space via GETVIS 


248 


F8 


4 


GRPLWALN 




Length of work area 
set to 


252 


FC 




ARLNEL 




AREALEN element 


252 


FC 


4 


ARLNKTC 


X , 002DOOO0' 


Keyword-type code 


256 


100 


4 


ARLNVAL 




Area Length 


260 


104 




ACBEL 




ACB element 


260 


104 


4 


ACBKTC 


X'002B0000' 


Keyword-type code 


264 


108 


4 


ACBAD1 




Address of ACB 


268 


10C 




KEYLNEL 




KEYLEN element 


268 


IOC 


4 


KEYLNKTC 


X'00300000 1 


Keyword-type code 


272 


110 


4 


KEYLNVAL 




Key length 


276 


114 




RECLNEL 




RECORDLEN element 


276 


114 


4 


RECLNKTC 


X'00350000 1 


Keyword-type code 


280 


118 


4 


RECLNVAL 




Record length 


284 


11C 




SHOWCB 




Information to show 
ACB or RPL 


284 


11C 


4 


SHHAD 




Address of header 


288 


120 


4 


SHEAD 




Address of element 


292 


124 




SHH 




Header 


292 


124 


1 


SHBTC 


X'OO' 


Block-type code 


293 


125 


1 


SHFTC 


X'03\ 


Function-type code 
(SHOWCB) 


294 


126 


2 


SHOTC 


X'0000' 


Object-type code 


296 


128 


4 


SHBAD 




Address of block to be 



ACCESS METHOD DEFINE THE FILE (AMDTF) TABLE (. . . .Cont'd) 



Displacement 


Bytes 


Field Name 


Hex 
Digit 


Description 


Dec 


Hex 


300 


12C 


4 


SHARAD 




Address of area 


304 


130 


4 


SHARLN 


X'0004' 


Length of area 


308 


134 


4 


SHAR 


X'OO 


Area where information 
is to be placed 


312 


138 




SHEL 




Element 


312 


138 


4 


SHKTC 




Keyword -type code 
(set by IIP) 


316 


13C 




MODRPL 




MODCB information 
to modify the RPL 


316 


13C 


4 


MRPLHAD 




Address of header 


320 


140 


4 


OPTCDEAD 




Address of OPTCD element 


324 


144 


4 


AREAEAD 




Address of AREA element 


328 


148 


4 


ARGEAD 




Address of ARG element 


332 


14C 




MRPLH 




Header 


332 


14C 


1 


MRPLBTC 


X'CO' 


Block-type code (RPL) 


333 


14D 


1 


MRPLFTC 


X'02' 


Function-type code 
(MODCB) 


336 


150 


4 


MRPLBAD 




Address of block to be 
modified (supplied by 
IIPOPEN) 


340 


154 




OPTCDEL 




OPTCD element 


340 


154 


4 


OPTCDKTC 


X'00340000' 


Keyword-type code 


344 


158 


4 


OPTCDVAL 




Bit pattern (supplied by IIP] 


348 


15C 




AREAEL 




AREA element 


348 


15C 


4 


AREAKTC 


X*002C0000' 


Keyword-type code 


352 


160 


4 


AREAAD 




Address of area (supplied 
by IIP) 


356 


164 




ARGEL 




ARG element 


356 


164 


4 


ARGKTC 


X , 002E0000' 


Keyword-type code 


360 


168 


4 


ARGAD 




Address of ARG parameter 
(supplied by IIP) 


364 


16C 




MSGOUT 




Header 


364 


16C 


2 


MSCCB 




Residual count 


366 


16E 


2 






Communications bytes 


368 


170 


2 






CSVV status bytes 


370 


172 


1 






Logical unit class 


371 


173 


1 






Logical unit 


372 


174 


1 






Zero 


373 


175 


3 






CCW address 


376 


178 


1 






Status byte 


377 


179 


3 






CSW CCW address 


380 


17C 


4 






Zeros 


384 


180 


8 


MSCCW 




CCW 


392 


188 


6 


ERRCDE 




Error code of message 


398 


18E 


5 


ISAMCM 




'ISAM' 


403 


193 


8 


ISCM 




ISAM command area 


412 


19C 


5 


VSAMCM 




'VSAM' 


417 


1A1 


8 


VCCM 




VSAM command area 


426 


1AA 


4 


CRCM 




'RC=' 


430 


1AE 


5 


CRC1 




Return code area 


435 


1B3 


20 


SHOWCBF 




Area if SHOWCB failed 


455 


1C7 


5 


CRC2 




Return code from SHOWCB 


460 


ICC 


4 


CRSCM 




'EC=' 


464 


1D0 


4 


CRSC 




Error code area 


468 


1D4 


1 


BRKT 




Closing bracket 



ADDRESS RANGE DEFINITION BLOCK (ARDB) 



Displacement 


Bytes 


Field Name 


Hex 
Digit 


Description 


Dec Hex 




1 1 


1 

1 


ARDID 
ARDTYPE 


X'AD 1 


Control block identifier 
Identifies the type of 
space defined by the 
ARDB: 






ARDKR 


X'80' 


One key range of a key- 
range data set 






ARDHLI 


X'40' 


The total index of a 
key-sequenced data set 
that does not have the 
sequence set with the 

The non-sequence set 
levels of a key- 
sequenced data set's 
index, when the 
sequence set is stored 
with the data 






ARDSS 


X'20' 


The sequence set of a 
key-sequenced data 
set, when the sequence 
set is stored with data 






ARDUOVFL 


X'10' 


Use overflow volumes 
for this key 






ARDEOD 


X'08' 


End of data ARDB 






ARDLGCC 


X'04' 


Device contains more 
than 256 cylinders 


2 2 


2 


ARDLEN 


X'80' 


Length of the ARDB 


4 4 


1 


ARDPRF 




Address range definition 
preformat byte (this 
byte is a literal copy 
of the catalog byte 
called ITYPEXT) 






ARDPRFMT 


X'40' 


No preformat done 


5 5 


3 






Reserved 


8 8 


4 


ARDNPTR 




Address of the next 
ARDB in the ARDB 
chain 


12 C 


4 


ARDHRBA 




The RBA of the next 
free-space control 
interval at the end of 
the data set 


16 10 


4 


ARDEDBA 




Pointer to the active 
EDB 


20 14 


4 


ARDPREL 




Pointer to related ARDB 


24 18 


4 


ARDERBA 




The RBA of the highest 
control interval 
allocated to the key 
range 



ADDRESS RANGE DEFINITION BLOCK (ARDB) (....Cont'd) 



Displacement 


Bytes 


Field Name 


Hex 
Digit 


Description 


Dec Hex 


28 IC 
32 20 

36 24 


4 
4 

2 


ARDPKEYS 
ARDHKRBA 

ARDVOLNM 




Pointer to ARDKEYS 
The RBA of the data set 
control interval 
containing the key 
range's high-key value 
Number of volumes in 
list 


The following ten-byte entry, called an ARDB volume group, repeats for each volume 
in this ARDB. 


38 26 
38 26 

44 2C 

46 2E 

46 2E 

47 2F 

48 30 


10 
6 

2 

2 
I 

1 
Variable 


ARDVOLGP 
ARDVOLSR 

ARDRELRP 

ARDSYMU 
ARDSUCLS 
ARDSUNUM 
ARDKEYS 




Volume serial 
(VOLSER) list 
The serial number of the 
volume containing the 
highest RBA allocated 
to the key range 
Catalog relative 
replication number 
Symbolic unit 
Symbolic unit class 
Symbolic unit number 
Space reserved for the 
key range's low and 
high key values. The 
length of this field 
equals twice the key 
length 



BUFFER CONTROL BLOCK (BCB) 



Displacement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










4 


BUFNBCB 




Address of the next 
BCB entry 


4 


4 


4 


BUFCBAD 




Buffer address 


8 


8 


20 


BUFRIODR 




Read I/O driver block 


8 


8 


2 


BUFCURRU 
BUFCURU 




Read symbolic unit 
Current logical unit 


10 


A 


2 


BUFBKSTR 




Number of physical 
blocks to read 


12 


C 


8 


BUFRSEEK 




Computed DASD 
address for read 


12 


C 


1 


BUFRM 




M 


13 


D 


2 


BUFRBB 




BB 


15 


F 


2 


BUFRCC 




cc 


17 


11 


2 


BUFRHH 




HH 


19 


13 


1 


BUFRR 




R 


20 


14 


4 


BUFCRRBA 




RBA for the read 


24 


18 


4 


BUFRLPMB 




Address of the read LPMB 


28 


1C 


20 


BUFWIODR 




Write I/O driver block 


28 


1C 


2 


BUFCURWU 




Write symbolic unit number 


30 


IE 


10 


BUFCKIN 




Write check initialize area 


30 


IE 


2 


BUFBKSTW 




Number of physical blocks 
to write 


32 


20 


8 


BUFWSEEK 




Computed DASD address 

for write 

M 


32 


20 


1 


BUFWM 




33 


21 


2 


BUF WBB 




BB 


35 


23 


2 


BUFWCC 




CC 


37 


25 


2 


BUFWHH 




HH 


39 


27 


1 


BUFWR 




R 


40 


28 


4 


BUFCWRBA 




RBA for the write 


44 


2C 


4 


BUFWLPMB 




Address of the write LPMB 


48 


30 


2 


BUFFLAG 
BUFFLAG1 




Flag bytes 
Flag byte 1: 








BUFCMW 


X'80' 


Write indicator 








BUFCFMT 


X'40' 


Format write indicator 








BUFCRRD 


X'20' 


Read indicator 








BUFRDAHD 


X'10' 


Read ahead request 








BUFPFMT 


X'08' 


Format remainder of control 
area 








BUFCVAL 


X'04' 


Buffer contents are valid 








BUFSSRCD 


X'02' 


Buffer is a sequence set 
record 








BUFRES1 


X'01" 


Available 








BUFFLAG2 




Flag byte 2 : 








BUFPURG1 


X'80' 


Purge - must write or read 








BUFPURG2 


X'40' 


Purge - format 








BUFRIXRD 


X'20' 


Replicated index read 



B UFF ER CONTROL BLOCK (BCB) (....Cont'd) 



Displacement 


Bytes 


Field Name 


Hex 
Digit 


Description 


Dec 


Hex 








BUFF REP 


X'08' 


Return buffer by REPBUF 








BUFWRINV 


X'10' 


Control interval was 
written - another string 








BUFRES2 


X'07' 


Available 


50 


32 


10 


BUFBKTWI 




Write initialize area 


50 


32 


2 


BUFBKTCK 




Number of physical 
blocks to check 


52 


34 


8 


BUFWCKSK 




Computed DASD 
address for check (not 
used in release 1) 


52 


34 


1 


BUFCM 




M 


53 


35 


2 


BUFCBB 




BB 


55 


37 


2 


BUF CCC 




CC 


57 


39 


2 


BUFCHH 




HH 


59 


3B 


1 


BUFCR 




R 


60 


3C 


4 


BUFVCCHH 




CCHH for index read 


60 


3C 


4 


BUFVCCB 




CCB address 


64 


40 


1 


BUFERFLG 




I/O error indicator 






1 


BUFEIOER 


X'80' 


I/O error on buffer 






1 


BUFESRCH 


X'40' 


I/O error on search ID 






1 


BUFESEEK 


X'20' 


I/O error on seek 






1 


BUFEREAD 


X'10' 


I/O error on read 






1 


BUFEWRT 


X'08' 


I/O error on write 






1 


BUFERBCK 


X'04' 


1/ O error on readback 
check 






1 


BUFENTCM 


X'02 1 


I/O operation complete 






1 


BUFEDSK 


X'01' 


2314 seek incorrect 


65 


41 


1 


BUFSTRID 




String ID of this set of 
buffers 


66 


42 


2 


BUFCNOl 




No. of blocks in control 
interval to process 


68 


44 


4 


BUF NAB CB 




Next BCB in AMDSB chain 



BUFFER HEADER (BHD) 



Displacement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










2 


BHDNO 




Number of buffers 


2 


2 


2 


BHDLEN 




Length of control block 


4 


4 


2 


BHDRMAX 




Maximum number of 
buffers available 


6 


6 


2 


BHDRMIN 




Minimum number of 
buffers available 


8 


8 


2 


BHDBRC 




Read-ahead count 


10 


A 


1 


BHDHFIAG 




Buffer header flag 1 








BHDRAHOK 


X'80' 


Read-ahead OK flag 








BHDIXREP 


X'40' 


Replicated index read 
indicator 








BHDNSKD 


X'08' 


I/O with wait for no- 
schedule queue 
(BCBNSKDQ) 








BHDSKD 


X'04' 


I/O with wait for 
schedule queue 
(3CBSKDQ) 








BHDMV3CB 


X'02' 


Free buffer is a move 


11 


B 


1 


BHDFLAG 




Buffer header flag 2 


12 


C 


4 






Reserved 


16 


10 


4 


BHD1STF 




Address of chain of 
free buffers 


20 


14 


4 


BHDSKDQ 




Address of BCB chain 
with I/O scheduled 


24 


18 


4 


BHDNSKDQ 




Address of BC3 chain 
with pending I/O 


28 


1C 


4 


BHD1STW 




Address of first BCB 
requiring I/O 


32 


20 


1 


BHDID 


X'77' 


BHD identification 


33 


21 


1 






Reserved 


34 


22 


2 


BHDIOCNT 




I/O count of no-schedule 
queue (BCBNSKDQ) 


36 


24 


2 


BHDWMIN 




Write threshold 


38 


26 


2 


BHDTRACT 




Temporary read-ahead 
count 


40 


28 


2 


BHDQNO 




Number of BCBs on queues 


42 


2A 


2 






Reserved 


44 


2C 


4 


BHDCCHH 




CCHH of last held control 

area 


48 


30 


4 


BHDCCBCH 




CCB chain pointer 



CATALOG AUXILIARY WORK AREA (CAXWA) 





Offset 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 







1 




1 


1 
3 


CAXID 


Control Block identifier X"CA" 
Reserved 


4 


4 


4 


CAXCHN 


Address of the next CAXWA in the chain 


8 


8 


.1 

1.. 

1. 

1 


CAXFLGS 

CAXBLD 

CAXOPN 

CAXCLS 

CAXEOV 

CAXCMP 

CAXMCT 

CAXCMR 

CAXSCR 


Flags: 

Build request 

The catalog is being opened 

The catalog is being closed 

An end-of -volume routine is in control 

Open /Close/EOV processing is 

l=Master Catalog 

0=User catalog 

Catalog management has been called by 

a catalog management routine 

Reserved for OS 


9 


9 


.1..' .... 

1.. 

1 


CAXFLG2 
CAXF2DT 
CAXF2NDD 
CAXF2CCR 

CAXF2CRA 
CAXF2REC 
CAXF2EOV 

CAXF2CA 


Flags: 

The catalog has been deleted 

No DD-name found 

0=CCR needs to be read 

1=CCR has been read 

CAXWA for CRA 

Recoverable catalog 

End of volume flag 

Reserved 

Free CAXWA if error 


10 


A 






Reserved 


11 


B 




CAXACT 


Catalog activity count 


12 


C 


4 


CAXATIOT 


Reserved for OS 


16 


10 


4 


CAXSCHWA 


Reserved for OS 


20 


14 


4 - 


CAXDRWP 


Address of the catalog's DRWA 


24 


18 


4 


CAXACB 
CAXCRACB 


Address of the catalog's ACB 
Address of CRA (ACB) 


28 


1C 


4 


CAXUCB 


Address of the COMREG 


32 


20 


12 


CAXCCR 


Catalog control record information 


32 


20 


3 


CAXHACI 


Catalog interval number of the highest 
allocated control interval in the catalog 


35 


23 


3 


CAXNFCI 


Control interval number of the next 
free control interval in the catalog 


38 


26 


3 


CAXCDCI 


Number of deleted control intervals 


41 


29 


3 


CAXFDCI 


Control interval number of the first 
deleted control interval in the catalog 


44 


2C 


2 




Reserved 


46 


2E 


2 


CAXRPLCT 


Number of RPLs associated with the 
CAXWA 


48 


30 


4 


CAXRPL 


Address of the first RPL in the CAXWA 's 
RPL chain 


52 


34 


44 


CAXCNAM 


Catalog name 


96 


60 


4 


CAXOPLST 


Open/Close paramater list : 


96 


60 


1 

1 

.XXX xxxx 


COPTS 
CENLST 


Option flags: 
End-of-list indicator 
Reserved 


97 


61 


3 


COPACB 


Address of the catalog's ACB 



CATALOG AUXILIARY WORK AREA (CAXWA) (.. .Continued) 



Offse 




Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






100 


64 


4 


CAXOPEWA 


Reserved for OS 


104 


68 


4 


CAXCCA 


Address of the CCA 


108 


6C 


4 


CAXJDE 


Reserved for OS 


112 


70 


4 


CAXCAT 


Address of the catalog's ACB 
associated with CRA 


115 


74 


6 


CAXVOLCR 


Volume serial of CRA volume 


112 


7A 


2 


CAXSYSCR 


SYS-number of CRA volume 


124 


7C 


6 


CAXVOLRM 


Volume Serial of REM volume 


130 


82 


2 


CAXSYSRM 


SYS-number of REM volume 


132 


84 


6 


CAXOCPAR 


O/C parameter list 


132 


84 


4 


CAXOCACB 


ACB address 


136 


88 


2 


CAXOCEOL 


End of list indicator 



CATALOG COMMUNICATIONS AREA (CCA) 



Displacement 


Bytes and 
Bit Pattern 


Field Name 


Description 


Dec Hex 





2 


CCAID 


Identifier - set to X'ACCA' 


2 2 


2 


CCASZ 


Size 


4 4 


I 


CCACD1 


Return code 1 


5 5 


1 


CCACD2 


Return code 2 


6 6 


1 


CCAFLG1 


Flag byte 1: 




1 


CCAF1LPS 


Stop the loop 




.1 


CCAF1APA 


Assign RPL to ARA 




..I 


CCAF1LRD 


Catalog control record read into 
virtual storage 




...1 .... 


CCAF1KEY 


Retrieve the catalog record based 
on a DSNAME value 




.... I... 


CCAF1KGE 


Retrieve the next catalog record 




1.. 


CCAF1CR 


A checkpoint of the CCR is required 




1. 


CCAFIUP 


GET macro instruction issued for 
update 




1 


CCAF1DK 


When the caller is renaming a data 
set, this flag indicates that the data 
set's true-name record is to be 
deleted, but the data set's catalog 
record is not to be deleted. 


7 7 


1 


CCAFLG2 


Flag byte 2: 




1 


CCAF2SYS 


Always set on 




.1 


CCAF2NVC 


No validity check on the caller's 
CTGFL or work area is required 




..1 


CCAF2CCT 


Reserved for OS 




...1 .... 


CCAF2XEQ 


Exclusive enqueue 




...0 .... 




Shared enqueue 




.... I... 


CCAF2RHS 


When a catalog management routine 
calls the VSAM Open routines to open 
a newly created catalog, and the Open 
routines call VSAM Catalog 
Management routines to obtain 
information about the catalog to be 
opened, the situation is called a 
"recursive call". The catalog cannot 
be dequeued when the Catalog 
Management routines return to the 
caller (VSAM Open routines). 




xx. 


CCAF2COB 


Combination of catalog open and build: 




.... .1.. 


CCAF2CO 


Catalog is being opened 




1. 


CCAF2CB 


Reserved for OS 




1 


CCAF2SMO 


Search master catalog only 


8 8 


1 


CCAFLG3 


Flag byte 3: 




1 


CCAEXGR1 


Exit indicator 




.1 


CCAGC4 


The catalog record containsjJjjassword 
group occurrence (idejtfffied by Group 














Code 4) (detected during IGGPSCNC 








processing) 




.. 1 


CCAGDSP 


GENDSP 




...1 .... 


CCAEXGR2 


Exit indicator 



CATALOG COMMUNICATIONS AREA (CCA) (. . . .Cont'd) 



Displacement 


Bytes and 
BU Pattern 


Field Name 


Description 


Dec Hex 




.... 1... 


CCANF 


The group occurrence cannot be found 




1.. 


CCAELC2 


Exit indicator 




1. 


CCALFT 


First time 




1 


CCAEGREC 


Exit indicator 


9 9 


1 


CCAFLG4 


Flag byte 4: 




1 


CCAF4DRQ 


The catalog must be dequeued after 
the request completes 




.1 


CCAF4BYS 


Bypass the security verification 




..1 


CCAGVNC 


The required variable-length field is 
not completely contained in the record 
currently in the buffer 




...1 .... 


CCAGVNF 


The group occurrence identified by the 
caller-specified sequence number 
cannol be found 




.... 1... 


CCAGVNBS 


There is no buffer space available to 
contain an extension record 




1.. 


CCAGVEX 


Exit indicator 




1. 


CCAGVNE 


The field does not exist in the located 
group occurrence 




1 


CCATCOMP 


Test complete : all group occurrence 
pointers have been examined and all 
designated fields have been tested 


10 A 


1 


CCAFLG5 


Flag byte 5: 




1 


CCAMEX2 


Exit indicator 




.1 


CCAMEX 


Exit indicator 




..1 


CCAMEX1 


Exit indicator 




...1 .... 


CCAMODPA 


The catalog record's base record must 
be written (using IGGPPAD) into the 
catalog 




.... 1... 


CCATHIT 


Successful test : a group occurrence 
has be found that satisfies the test 
conditions 




1.. 


CCATEX 


Exit indicator 




1. 


CCATEX1 


Exit indicator 




1 


CCATEX2 


Exit indicator 


11 B 


1 


CCAFLG6 


Flag byte 6: 




1 


CCAMCODR 


The catalog must be dequeued when the 
request completes 




.1 


CCADELP 


A deleted group occurrence pointer 
was found 




..1 


CCAMNOSP 


The catalog record's free space isn't 
large enough to contain all the new 
catalog information during the group 
occurrence move operation 




...1 .... 


CCAINIT 


Insert switch for variable-length 
field being retrieved 




.... 1... 


CCASUPFD 


Suppress password field information 
during field retrieval 




1.. 


CCAREUSE 


The contents of the caller's record 
areas (buffers) can be used by 
IGGPEXT and IGGPMOD 



CATALOG COMMUNICATIONS AREA (CCA) (. . . .Cont'd) 



Displacement 


Bytes and 
Bit Pattern 


Field Name 


Description 


Dec 


Hex 






1. 


CCAEXT 


Set when a catalog management 
routine calls the Extract routine 
(IGGPEXT) 






1 


CCAMOD 


Set when a catalog management 
routine calls the Modify routine 
(IGGPMOD) 


12 


C 


4 


CCALBCYL 


Address of the label cylinder area 


16 


10 


4 


CCADPL 


Address of the DADSM parameter list 


20 


14 


4 


CCACPL 


Address of the caller's CTGPL 


24 


18 


4 


CCAACB 


Address of the catalog's ACB 


28 


1C 


4 


CCANPCCB 


Address of next PCCB 


32 


20 


4 


CCAURAB 


Address of the record area block 
(RAB) currently in use 


36 


24 


44 


CCASRCH 


Search argument (DSNAME of a 
cluster, data, index, catalog, or non 
VSAM data set, or a volume serial 
number) 


36 


24 


3 


CCASRID 


Control interval number 






3 


CCASRCIN 


Control interval number 


80 


50 


20 


CCARAB0 


Record Area Block : Each record 
area block describes the catalog 
record contained in one of the six 
catalog management buffers available 
for the request. RABs 1 through 5 are 
identical in format to RAB 0. 
Note : "x" in each field name is 
replaced by "0" through "5" to 
indicate a particular RAB's field. 


80 


50 


.1 


CCARxFLG 

CCARxUR 
CCARxUl 


Flags: 

The following flag is used by IGGPEXT 

and IGGPMOD: 

The RAB is in use. It cannot be used by 

IGGPEXT or IGGPMOD 

The RAB is temporarily in use by 

IGGPEXT or IGGPMOD. It cannot be 

overlaid 

(Same as CCARxUl) 






..1 


CCARxU2 






...1 .... 


CCARxWR 


The buffer must be written before 
another catalog record can be read 
into it 
The buffer contains a new catalog 






.... 1... 


CCARxPA 










record - PUT-add is required to add 










the record to the catalog 






xx . 




Reserved 






.... ...] 


CCARxUPD 


Update buffer not reused 


81 


51 


1 


CCARxRPL 


Last assign, RPL index 


82 


52 


2 




Reserved 


84 


54 


4 


CCARxREC 


Address of the record in the buffer 


88 


58 


12 


CCARxSEG 


Addresses of segments 



CATALOG COMMUN 1CATIONS AREA (CCA) ( . . . Cont 'd) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






88 


58 


4 


CCACPE2x 


Address of the first byte after the 
fixed-length header fields 


92 


5C 


4 


CCACPE3x 


Address of the first group occurrence 


96 


60 


4 


CCACPE4x 


Address of the first free-space byte 
in the record 


100 


64 


20 


CCARAB1 


Record Area Block 1 (See RAB 
description) 


120 


78 


20 


CCARAB2 


Record Area Block 2 (See RAB 
description) 


140 


8C 


20 


CCARAB3 


Record Area Block 3 (See RAB 
description) 


160 


A0 


20 


CCARAB4 


Record Area Block 4 (See RAB 
description) 


180 


B4 


20 


CCARAB5 


Record Area Block 5 (See RAB 
description) 


200 


C8 


1 


CCARPLK 


Assigned RPL count 


201 


C9 


1 


CCARPLF 


Index to RPL found 


202 


CA 


1 


CCARPLX 


Work byte for ARPL, RPLM 


203 


CB 


1 


CCARPLT 


Work byte for ARPL, RPLM 


204 


CC 


6 


CCARPLAA 


Indices to assigned RPLs 


210 


D2 


2 




Reserved 


212 


D4 


4 


CCARPL1 


Address of the RPL in use 


216 


D8 


44 


CCADESA 


Save area for the extent information 
returned by VSAM DADSM and 
Catalog Management : Subal locate 


216 


D8 


1 


CCANDEXT 


Number of extents 


217 


D9 


1 


CCAIXEXT 


Extent index value 


218 


DA 


2 


CCASSVOL 


Sequence number of the date set 
directory entry in the volume catalog 


220 


DC 


128 


CCAEXTDE 


Sixteen 8-byte extent descriptors : 


220 


DC 


2 


CCAEXTSS 


Sequence number of the Data Space 
group occurrence that this extent's 
space is a part of 


222 


DE 


4 


CCAEXTAD 


The extent's starting physical address : 


222 


DE 


2 


CCAEXTCC 


Cylinder number CC 


224 


E0 


2 


CCAEXTHH 


Head number HH 


226 


E2 


2 


CCAEXTTH 


Number of tracks in the extent 


348 


15C 


1 


CCAASCIK 


Number of control intervals required 
to satisfy the caller's request 


349 


15D 


1 


CCACRRP 


RPL used for reading CCR 


350 


15E 


1 


CCAASCIX 


Used by the ASSIGN functions - points 
to the element in CCAASCI currently 
being processed 


351 


15F 


1 


CCASR^LX 


Saved RPL flags 


352 


160 


9 


CCA AS CI 


Number of each assigned control 


361 


169 


3 


CCAUPGD 


Control interval for UPG modification 


364 


16C 


16 


CCAEQDQ 


Enqueue/ Dequeue parameter list 


364 


16C 


1 


CCAEDXFF 


End of parameter list, indicator byte 
=X'FF' 


365 


16D 


1 


CCAEDRLN 


Length of minor name 



CATALOG COMMUNICATIONS AREA (CCA) (. . .Cont'd) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






366 


16E 


1 

1 

.1 


CCAEDOPT 
CCAEDSHR 
CCARLSEB 


Enqueue/Dequeue Options 
l=Shared, 0=Exlusive 
Release control bit 
Other options (set by macro) 


367 


16F 


1 


CCAEDRCD 


Enqueue/Dequeue return code 


368 


170 


4 


CCARTSAV 


Save area for CCAMLRET 


372 


174 


4 


CCACOMRG 


COMRG pointer 


376 


178 


4 


CCAEDUCB 


Work area 


380 


17C 


4 


CCAMLRET 


Address of the caller's save area 
used by IGG0CLAG 


384 


180 


12 


CCAMSSPL 


GETVIS/FREEViS parameter list area 


384 


180 


4 


CCAMNLEN 


Number of bytes to process 


388 


184 


4 


CCAMNPTR 


Address of the return address 


392 


188 


1 




Reserved for OS 


393 


189 


1 


CCAMNSPL 


Reserved for OS 


394 


18A 


2 




Reserved for OS 


396 


18C 


4 


CCARPRM 


Return parameters 


400 


190 


8 


CCA CMS 


Catalog management Services work area 


400 


190 


4 


CCACMSWA 


Address of the CMS calling routine's 
work area 


404 


194 


4 


CCAEXCMS 


Address of a secondary CMS work area 


The foil 


owing f 


ields are set 


and used by IGG 


PLOC, IGGPEXT, and IGGPTSTS, 


and catalog ma 


nagement su 


jfunctions which t 


nese procedure call : 


408 


198 


4 


CCALUME 


Address of a selected group occurrence 


412 


19C 


4 


CCACPE51 


(Same as CCACPE5) 


416 


1A0 


4 


CCACPE52 


(Same as CCACPE5) 


420 


1A4 


4 


CCACPE53 


(Same as CCACPE5) 


424 


1A8 


4 


CCACPE6 


Address of a selected group occurrence 


428 


1AC 


4 


CCACPE61 
CCARABSE 


(Same as CCAPE6) 

Save extract caller URAB 


432 


130 


4 


CCACPE7 
CCAIDPT 


Address of field value 
Insert data address 


436 


1B4 


4 


CCACPE71 


Alternate address to field value 


440 


1B8 


2 


CCAGOPLN 


Length of the group occurrence pointer 


442 


1BA 


2 


CCASL 


Number of bytes for the sequence number 


444 


1BC 


4 


CCAILNG 


Length of the selected retrieved field 


448 


1C0 


4 


CCAFLPT 
CCATFLPT 


Address of the requested-field CTGFL 
Address of the CTGFL-for-tests 


452 


1C4 


4 


CCARABPT 


Address of the record area block 


456 


1C8 


4 


CCADICT 


Dictionary information to describe the 
field, based on its field name 


460 


ICC 


4 


CCAXCPL 
CCAMCPL 


Address of the CTGPL built when 
IGGPEXT and IGGPMOD are called, so 
that information in the caller's CTGPL 
is not altered 


464 


1D0 


4 


CCARABB 


Address of the RAB that identifies the 
base catalog record 


468 


1D4 


4 


CCARABF 


Address of the RAB that identifies the 
first record area (buffer) that can be used 
by IGGPEXT or IGGPMOD 



CATALOG COMMUNICATIONS AREA (CCA) (. . .Cont'd) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






472 


1D8 


4 


CCARABL 


Address of the RAB that identifies the 
last record area (buffer) that can be used 
by IGGPEXT or IGGPMOD 


476 


IDC 


3 


CCACBASE 


The control interval number of the base 
catalog record 


479 


IDF 


1 


CCAGC 


Group code of the requested group 
occurrence 


480 


1E0 


2 


CCALREL 
CCALREL1 


Relative repetition number of a selecte 
group occurrence 


482 


1E2 


2 


CCASN 
CCASN1 


Sequence number of a selected group 
occurrence 


484 


1E4 


.1 

.... 1... 
1.. 

1. 

1 


CCAFLG8 

CCARPUT 

CCALSTC 

CCAEXTCR 

CCABLDCR 

CCASPUCO 

CCASCAX 

CCAUPG 
CCABUF 


CRA flags 

Inhibit CRA PUT 

List cat request 

Extend CRA in process 

Open request for CRA build 

Special UCAT 

1=CRA CAXWA search; 

0= UCAT CAXWA search 

l=upgrade ; 0=no upgrade 

Output buffering flag 


485 


1E5 


.1 

..1 


CCAFLGA 
CCAUPGRR 
CCARGET 

CCALBFUT 


More flags 

RAB1 to be restored by upgrade module 

Get record for compare before update 

CRA 

l=Multiple file parameter search at define 

Reserved 


436 


1E6 


2 


CCAIXFPL 


Index to the current CTGFL being 
processed 


488 


1E8 


2 


CCAIXREL 


Index for CCATREL 


490 


1EA 


2 


CCATNREL 


The sequence number of the next group 
occurrence to perform tests against if 
CCATREL is full or if there are no buffers 
available to ccntain the catalog record's 
next extension 


492 


1EC 


2 


CCATNUM 


Number of successful relative repetition 
numbers (cannot exceed 16) 


494 


1EE 


32 


CCATREL 


Successful relative repetition numbers 


526 


20E 


2 


CCATNO 


Total number of successful relative 
repetition numbers (might exceed 16) 


528 


210 


4 


CCATEST 


Addre'ss of the test CTGFL 


532 


214 


20 


CCARBA 


Work area for extent descriptors 


532 


214 


2 


CCASS 


Sequence number of the Data Space 
group occurrence that contains the extent 


534 


216 


4 


CCACCHH1 


Physical address -CCHH - of the extent's 
first track 


538 


21A 


4 


CCACCHH2 


Physical address -CCHH - of the extent's 
last track 


542 


21E 


2 


CCATT 


Number of tracks in the extent 


544 


220 


4 


CCARBA1 


Low relative byte address (RBA) 


548 


224 


4 


CCARBA2 


High relative byle address (RBA) 



CATALOG COMMUNICATIONS AREA (CCA) (. . .Cont'd) 



Displacement 
Dec Hex 



Bytes and 
Bit Pattern 



554 


22A 


2 


556 


22C 


2 


558 


22E 


2 


560 


230 


4 



568 


238 


2 


570 


23A 


2 


572 


23C 


3 


575 


23F 


1 


576 
577 


240 
241 


1 
1 


578 


242 


2 


580 
582 


244 
246 


2 
2 



586 


24A 


588 


24C 


590 


24E 


593 


251 


596 


254 


600 


258 


604 


25C 


606 


25E 


608 


260 


612 


264 


616 


268 


620 


26C 


624 


270 



CCATLNG 
CCATLEN 



CCARBAL 
CCACNIX 
CCAREASN 
CCAIDPT2 



CCAIDPT3 
CCARABSM 

CCAGVCT 

CCANEVV 

CCAGVEXT 

CCANEFV 

CCAGRGC 

CCAGRHI 
CCAGRHI1 
CCAIXTPL 
CCADLEN 

CCADIFF 



CCASVCI 

CCASVCI1 

CCADTA 

CCACDTA 

CCADTCT 

CCACDTCT 

CCACWAP 

CCAMNADR 

CCAILNG3 
CCAILNG2 
CCAALPTR 



Total length of the extent information 
that has been processed (CCATLNG) ; 
total length of the scanned field so far 
(CCATLEN) 
RBA extent balance 
Combination name index 
Reason code 

Address of the available space in the 
caller's work area or of the caller- 
supplied update information 
Address of the length-field of a 
variable length field in the user's 
return area 

Number of group occurrence pointers 
processed so far 

If the requested variable-length field is 
non-extent, this field is set to binary zero 
Control interval number of the record's 
next extension record (not yet in a buffer) 
If the requested fixed- length field is 
non-extent, this byte is set to X"FF". 
Reserved 

Group code of the requested group 
occurrence 
High relative repetition number 

Index to test FPL 

Number of bytes to be deleted from the 

catalog record 

The difference between the insert length 

and the delete length (can be a negative 

number) 

Number of relative repetition numbers 

processed so far 

Displacement into variable-length field to 

the delete/ insert location 

Save area for the control interval number 

of the base catalog record 

Save area for the control interval number 

Address of the dictionary 

Address of the index combination table 

Number of dictionary entries 

Number of index combination entries 

Controller work area 

Address of the virtual storage obtained by 

a GETVIS request 

Save area for the insertion length 

Length of the user-supplied insert data 

Address of the space management work 

area 

Reserved 



CATALOG COMMUNICATIONS AREA (CCA) (...Cont'd) 



Displo 


cement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






632 


278 


4 


CCALCPL 


Reserved for OS 


636 


27C 


.1 

..1 

...1 .... 
.... 1... 

1.. 

1. 

1 


CCAFLG7 

CCALSP 

CCANRLSE 

CCACKDEL 

CCASMPBR 

CCAONCE 

CCAROREO 

CCAFEOV 

CCAEQOPN 


Flags: 

Reserved for OS 

Release Control Bit 

Delete switch 

Do GET for base record 

Move only one occurrence 

Read only request 

Force EOV 

Enqueued on SYSOPEN 


637 


27D 


3 


CCARCI 


CRA Record control interval number 


640 


280 


4 


CCALABSV 


Saved address of IKOLAB area 


644 


284 


4 


CCARABSV 


Saved address of RAB 


648 


288 


2 


CCAMODUL 


Module name 


650 


28A 


3 


CCACHAIN 


Control interval number save area 


653 


28D 


3 


CCACI1 


Control interval number save are 


656 


290 


3 


CCACI2 


(Same as CCACI1) 


659 


293 


3 


CCACI3 


(Same as CCACI1) 


662 


296 


2 


CCAVARLN 


Number of bytes to be inserted into 
the record 


664 


298 


4 


CCARRAB 


Address of the RAB containing the 
group occurrence pointers where 
delete/insert processing is to begin 


668 


29C 


4 


CCARBASE 


(Same as CCARRAB) 


672 


2A0 


4 


CCAVARPT 


Address of the information to be 
inserted into the record 


676 


2A4 


2 


CCADELN 


Number of bytes to be deleted from 
the record 


678 


2A6 


20 


CCAVAR 


Insert information save area 


698 


2BA 


20 


CCAVAR1 


(Same as CCAVAR) 


718 


2CE 


3 


CCADEL1 


The control interval number of the first 
record in a series of records to be 
deleted 


721 


2D1 


3 


CCADEL2 


The control interval number of the last 
record in a series of records to be 
deleted 


724 


2D4 


40 


CCAXLATE 


Translation work area 


764 


2FC 


4 


CCAR14S 
CCABMINP 


Register 14 save area 
Input parameters 


768 


300 


2 


CCABMTRK 


Starting track 


770 


302 


2 


CCABMLIM 


Check limit, nn for set 


772 


304 


2 


CCABMMIN 


Conditional check minimum 


774 


306 


.1 

..1 

...1 .... 
.... 1... 


CCABMFLG 

CCABMST 

CCABMCHK 

CCABMSET 

CCABMCCK 

CCABMLST 


State and function code 
State to set condition check 
ON -Perform check 
ON-Perform set 
ON-Perform condition check 
ON -Last set request (write) 
Reserved 


775 


307 




CCABMOUT 


Reserved 

Output parameters 


776 


308 


2 


CCABMONN 


Track number 


778 


30A 


2 


CCABMOTR 


Starting track 



CATALOG COMMUNICATIONS AREA (CCA) ( . . .Cont'd) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






780 


30C 


1 

1 


CCAMOFG 
CCABMOST 


Output flags 
State of bits 
Reserved 


781 


30D 


6 


CCAVOLCR 


CRA volume identification 


787 


313 


1 


CCABMPAD 


Padding character 


788 


314 


4 


CCABMGOP 


Current bit mask GOP 


792 


318 


4 


CCABMPTR 


Address of current bit mask byte 


796 


31C 


4 


CCABMEND 


End of current bit mask 


800 


320 


2 


CCABMBT1 


Bit count, first byte 


802 


322 


2 


CCABMBTL 


Bit count, last byte 


804 


324 


2 


CCABMBYT 


Number of full bytes 


806 


326 


2 


CCABMSTR 


Current bit mask, start track 


808 


328 


4 


CCABMWK 1 


Work field 


812 


32C 


4 


CCABMWK2 


Work ffeld 


816 


330 


4 


CCABMWK 3 


Work field 


820 


334 


4 


CCABMWK4 


Work field 


824 


338 


4 


CCABMRB1 


Address of first bit map RAB 


828 


33C 


4 


CCABMRB2 


Address of second RAB 


832 


340 


4 


CCACARWA 


Address of CRA definition work area 


836 


344 


4 


CCACRABF 


Address of CRA buffer 


840 


348 


4 


CCASACB 


Address of saved CCA, ACB field 


844 


34C 


4 


CCAEXC 


Save address for CCA ACB 


848 


350 


4 


CCASR^L 


Address of saved CCA, RPL field 


852 


354 


4 


CCAADBUF 


Address of cluster record buffer, cluster 
record saved until CRA volume known 


856 


358 


4 


CCASCAXS 


Address of search argument for CAXWA 
chain search 


860 


35C 


4 


CCASCAXA 


Address of found CAXWA 


864 


360 


4 


CCADEVT 


CRA volume device type 


868 


364 


8 


CCANMF1 


Name field of variable open resource 


876 


36C 


8 


CCANMF2 


Name field of variable open resource 


884 


374 


8 


CCANMF3 


Name field of variable open resource 


The fol 


owing tv 


vo fields are 


used by the no-u 


sgrade/upgrade function, called by 


ALTER, 


DEFINE 


or DELETE 






892 


37C 


3 


CCAXDCI 


AIX data control interval number 


895 


37F 


3 


CCAXICI 


AIX index control interval number 


898 


382 


1 


CCACATIN 


CLAH indicator 


899 


383 


1 




Reserved 


900 


384 


4 


CCACOPTR 


CLCO work area 


904 


388 


4 


CCADEVA 


Address of device character return area 


908 


38C 


4 


CCAFARE 


Address of file identification 


912 


390 


4 


CCAAREA 


Pointer to address of label record area 


916 


394 


2 


CCAMDSAV 


Save area for CCA module 


918 


396 


2 


CCARSSAV 


Save area for CCA 


920 


398 


40 


CCATEMPS 


Temporary area for PLS 


960 


3C0 


343 


CCAREGS 


Save area for registers 


960 


3C0 


4 




Address of user save area 


964 


3C4 


8 


CCAMODNM 
CCAEND 


Load module name 
End CCA 



CONTROL INTERVAL WORK AREA (CIW) 



Offset 
Dec Hex 


Bytes and 
Bit Pattern 


Field Name 


Description 


Register Save Area for IKOCIS 




4 4 
8 8 
12 C 
16 10 
20 14 
24 18 


48 
4 
4 
4 
4 
4 
4 
4 


CIV/AVE 

CIWAVR14 

CIWAVR15 

CIWAVR0 

CIWAVR1 

CIWAVR2 

CIWAVR3 

CIWLNGTH 


Register save area (12 Reg.) 
Register 14 
Register 15 
Register 

Register 1, RDF shift count on entry 
Register 2, RDF modification offset 
Register 3, RDF data work area 
Length of work area 


Space Manager Save Area 


52 34 
56 38 
60 3C 


4 
4 
4 


CIWSPA14 
CIWSPA15 
CIWSPA03 


Register 14 
Register 15 
Register 3 


IKQPFO Work Area 


64 40 
68 44 
72 48 
76 4C 
80 50 
84 54 
88 58 
92 5C 


4 
4 
4 
4 
4 
4 
4 
2 


CIWPF014 

CIWPFO00 

CIWPFO01 

CIWPFO02 

CIWPFO03 

CIWPFO04 

CIWACB 

CIWSVC 


Register 14 

Register 

Register 1 

Register 2 

Register 3 

Register 4 

ACB pointer for TCLOSE call 

SVC2inTCLOSE call list 


IKQRRP Work Area 
The work area for IKQRRP overlays the work area for IKQPFO 


64 . 40 
68 44 
72 48 
76 4C 
80 50 
84 54 
88 58 
92 5C 


4 
4 
4 
4 
4 
4 
4 
2 


CIWRRP14 

CIWRRP00 

CIWRRP01 

CIWRRP02 

CIWRRP03 

CIWRRBA 

CIWRRPLN 

CIWRSEOF 


Register 14 

Register 

Register 1 

Register 2 

Register 3 

Beginning of RBA in extent 

Preformat length 

SEOF indicator 


IKQNCA Work Area 


96 60 
100 64 
104 68 
108 6C 

112 70 
116 74 
120 78 


4 
4 
4 
4 

4 
4 
4 


CIWNEW14 
CIWNEW01 
CIWNEW03 
CIWCARBA 

CIWCIRBA 
CIWNXRBA 
CIWDARDBB 


Register 14 

Register 1 

Register 3 

Low RBA of data control area 

(new control area) 

Index RBA of old sequence set record 

Index RBA of new sequence set record 



CONTROL INTERVAL WORK AREA (CIW) ( 


. .Continued) 












Offset 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






IKQCAS Work Area 


124 


7C 


4 


CIWCAS14 


Register 14 


128 


80 


4 


CIWCAS03 


Register 3 


132 


84 


4 


CIWHINEW 


High section of new control area 


136 


88 


4 


CIWSPTR 


Pointer save section 


140 


8C 


4 


CIWHIOLD 


High section of old control area 


144 


90 


4 


CIWEPTR 


Entry pointer 


148 


94 


4 


CIWAKEY 


Address of key save area 


152 


98 


2 


CIWEINC 


Entry increment bytes 


154 


9A 


2 


CIWSRR 


Offset of last section from the high 
section of the new control area 


156 


9C 


4 


CIWXBUFA 


Address of new index buffer 


Offset 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 








IKQCIR Work Area 








Control Interval Space Reel 


□motion Work Area 


The work 


area fo 


r IKQCIR overlays the work a 


reas for IKQNCA and IKQCAS 


96 


60 


4 


CIWCIR14 




Register 14 


100 


64 


4 


CIWCIR09 




Register 9 


104 


68 


4 


CIWCIR03 




Register 3 


108 


6C 


4 


CIWSAVP 




Free data of pointer save 
for control interval 


112 


70 


1 


CIWCIRSW 




Switch byte 








CIWNEXT 


X*80' 


Position to next entry index 








CIWSPAN 


X'40' 


Spanned entry index 








CIWRECL 


X'20' 


Space reclamation index 








CIWNOSPL 


X'10' 


No control area split 
indicator 








CIWXWRT 


X'08' 


Write index indicator 






3 






Reserved 


113 


71 


12 


CIWLASMD 




IKQLASMD parameter list 


116 


74 


1 


CIWLID 




Request type 








CIWLTST 


X'04' 


Test request 


117 


75 


7 


CIWLDSID 




Data set identification 


117 


75 


3 


CIWLDSC! 




Control interval number 


120 


78 


4 


CIWLACB 




Pointer to catalog ACB 


124 


7C 


1 


CIWLSOPT 




Share option 


125 


7D 


1 


CIWLFLG 




Flag byte 








CIWLIN 


X'80' 


Input indicator 


126 


7E 


2 


CIWLOUT 




Output count 


128 


80 


8 


CIWRES 




Resource name field 



CONTROL INTERVAL WORK AREA (CIW) (...Continued) 



Offset 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




1KQC1S Work Area 


160 


A0 


32 


CIWCIWA 




Copy of PLH work area 


192 


CO 


4 


CIWRCDCT 




Record count save for move 


196 


C4 


4 


C1WMODPT 




Pointer to modification point 


200 


C8 


4 


CIWFPTR 




Next address 


204 


CC 


4 


CIWFRDF 




Next RDF 


208 


DO 


4 


CIWTCIL 




Total data length of control 
interval 


212 


D4 


4 


CIWCLNUP 




RBA of control interval 
requires an update 


216 


D8 


4 


CIWDCRDB 




Save of current ARDB 
pointer 


220 


DC 


4 


CIWNIRBA 




RBA of new sequence set 


225 


E0 


2 


CIWOLDCT 




Save of RDF count 


226 


E2 


1 


C1WFLAGS 




Flags 








CIWNTWO 


X'80' 


Two control intervals are 
needed for this split 








CIWNCAS 


X'40' 


Control area split needed 
to continue 








CIWCASDN 


X'20' 


Control area split has been 
executed 








C1WUHKR 


X'10' 


ARDHKRBA requires update 








C1WCLN 


X'08' 


Control intervals written 
require clearing 








CIWCIR 


X'04' 


Space reclamation executed 






IKQ1XE En 


try Stack 






228 


E4 


4 


CIWENTRY 




Index entry data stack 


228 


E4 


12 


CIWENT1 






228 


E4 


4 


CIWRBA1 




RBA to be put in entry 


232 


E8 


4 


CIWKADD1 




Address of key 


236 


EC 


2 


CIWKL1 




Length of key 


238 


EE 


1 


CIWFLG1 




Flag byte 








C1WENTOK 


X'8T 


Two bits are used as indicatoi 








C1W1NC 


X'40' 


Index record in core 








CIWSPLIT 


X'20' 


Split entry to be done 








CIWNOIO 


X'10' 


No execution of input/ 
output yet 


239 


EF 


1 


CIWIXLV1 




Index level 


240 


F0 


12 


CIWENT2 




Second stack position 


240 


F0 


4 


CIWRBA2 




RBA 


244 


F4 


4 


CIWKADD2 




Key pointer 


248 


F8 


2 


C1WKL2 




Key length 


250 


FA 


1 


CIWFLG2 






251 


FB 


1 


C1W1XLV2 




Index level 


252 


FC 




CIWSTKND 




End of stack 


252 


FC 


4 


CIWEKEYA 




Address of index enter key 



CONTROL INTERVAL WORK AREA (CIW) (. . .Continued) 



Offset 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




Scratch Buffer Parameter List 


256 


100 


20 


CIWDCNV 




Scratch CI descriptor 


256 


100 


4 


CIWDRBA 




Scratch control interval 
RBA 


260 


104 


8 


CIWDBUF 




Buffer paramater list 


260 


104 


4 


CIWDBCB 




Address of control block 


264 


108 


4 


CIWDBAD 




Address of buffers 


268 


10C 


4 


CIWDCIDF 




CIDF descriptor 


268 


10C 


2 


CIWDFSO 




Free space offset 


270 


10E 


2 


CIWDFSL 




Free space length 


272 


110 


1 


CIWDSW 




Switch byte 


273 


111 


1 






Reserved 


274 


112 


2 


CIV/DCSZ 




Length of buffer - 10 


IKQIXE Work Area 


276 


114 


4 


CIWIXEBA 




Caller base save 


280 


118 


4 


CIWIXERT 




Return register save 


284 


11C 


4 


CIWIXER0 




Save GETVIS length 


288 


120 


4 


CIWIXER1 




Save GETVIS address 


Work Area for Linkage from IKQCIS to IKQCAS 


292 


124 


4 






Reserved 


296 


128 


4 


CIWCR8 




Register save for linkage 


AMDSB Save Area for Updates to AMDSB Control Fields 


300 


12C 


4 


CSXHLRBA 




AMDHLRBA index 


304 


130 


2 


CSXNIL 




AMDNIL index 


IXFORMAT Work Space 


308 


134 


4 


CIWIXFBA 




Save callers base 


312 


138 


4 


CIWIXFRT 




Save return register 


316 


13C 


4 


CIWLSEP 




Entry pointer for last 
section 


320 


140 


4 


CIWANLSE 




Entry address for last 
section 


324 


144 


4 


CIWANLE 




Last entry address 


328 


148 


2 


CIWKEYL 




Length of current key 


330 


14A 


2 


CIWNLSEL 




Length of last section key 


332 


14C 


2 


CIWNLEL 




Length of last entry key 


336 


150 


4 


CIWXNSA 




Address of next section 


340 


154 


4 


CIWXSOP 




Offset pointer of last 
section 


344 


158 


2 


CIWFCNT 




Format count 


346 


15A 


2 


CIWCINL 




Control entry length 


The following fie 


d must be of the same length as PLHWAREA 


348 


15C 


44 | CIWAREA | | Work area for RDF build 



CATALOG PARAMETER LIST (CTGPL) 



Displacement 


Bytes and 


Field Name 


Description 


Dec Hex 


Bit Pattern 









1 


CTGOPTN1 


First option indicator : 




1 


CTGBYPSS 


Bypass the catalog management 
security verification processing 




.1 


CTGMAST 


Check the master password 




..1 


CTGCI 


Check the control interval password 




...1 .... 


CTGUPD 


Check the update password 




.... 1... 


CTGREAD 


Check the read password 




1.. 


CTGNAME 


The CTGENT field contains the address 
of a 44-byte DSNAME, or a 6-byte 
volume serial number (padded with 
binary 0's) 




0.. 




The CTGENT field contains the 
address of a 3-byte control intervol 
number 




1. 


CTGCNAME 


The CTGCAT field contains the 
address of a 44-byte catalog DSNAME 




0. 




The CTGCAT field contains the 
address of a VSAM catalog's ACB 




x 




Reserved 


1 1 


1 


CTGOPTN2 


Second option indicator : 




1 


CTGEXT 


Extend option (with UPDATE) 




.1 


CTGERASE 


Erase option (with DELETE) 






CTGSMF 


Reserved for OS 






CTGREL 


Release (with UPDATE) 




..1 


CTGPURG 


Purge option (with DELETE) 






CTGVMNT 


Volume mount caller 




...1 .... 


CTGGTNXT 


Get-next option (with LISTCAT) 






CTGDISC 


Disconnect option (with DELETE) 






CTGOVRID 


Erase override option (with DELETE) 




1. 


CTGSCR 


Scratch space option (with DELETE) 




x 




Reserved 


2 2 




CTGOPTN3 


Third option indicator : 




XXX 


CTGFUNC 


Specifies the caller-requesicd function : 




001 




LOCATE 




Oil 




UPDATE 




100 




A Catalog Management Services 
function (see CTGOPTNS) 




...1 .... 


CTGSUPLT 


Reserved for OS 
Reserved 






CTGSRH 


Reserved for OS 




1. 


CTGNUM 


Reserved for OS 




1 


CTGAMO 


VSAM request versus non VSAM 


3 3 




CTGOPTN4 


Reserved for OS 


4 4 


4 


CTGENT 


Address of the catalog record identifier, 
as defines in CTGOPTN1 






CTGFVT 


Address of the caller"s CTGFV 


8 8 


4 


CTGCAT 


Address of the catalog's DSNAME or 
ACB, as specified in CTGOPTN1 


12 C 


4 CTGWKA 


Address of the caller's work area 



CATALOG PARAMETER LIST (CTGPL) (.. .Continued) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






16 


10 


2 

0000 1 . . . 

0001 0... 
0001 1... 
0010 0... 


CTGOPTNS 


Catalog Management Services 

request options : 

DEFINE 

ALTER 

DELETE 

LISTCAT 

Reserved 


17 


11 


1 

1 

.1 


CTGCRFLG 
CTGLBCYL 

CTGCTRBL 


CRA open flags 

Label cylinder information is passed 

for CRA 

Control blocks are passed for CRA 

Reserved 


18 


12 


1 


CTGTYPE 


Type of catalog record 






CD' 


CTGTDATA 


Data 






CI' 


CTGINDX 


Index 






C'A' 


CTGALIN 


Non-VSAM 






C'LT 


CTGTUCAT 


User catalog 






C'V 


CTGTVOL 


Volume 






C'C 


CTGTCL 


Cluster 






CM' 


CTGTMCAT 


Master catalog 






C'G' 


CTGTAIX 


Alternate index 






CR' 


CTGTPTH 


Path 






C"Y' 


CTGTUPG 


Upgrade set 


19 


13 


1 


CTGNOFLD 


Number of entries contained in 
CTGFIELD 


20 


14 


4 


CTGDDNM 
CTGNEWMN 


Address of the DLBL statement ; if one 
is associated with this request 
Address of the new DSNAME ; if the 
request Is being changed 


24 


18 


4 


CTGPSWD 


Address of the caller-supplied 
password 


28 


1C 


4 


CTGDDUC 


Address of UCAT file name 


32 


20 


4 


CTGDDCR 


Address of CRA file name 


36 


24 


4 


CTGFIELD 


Field pointers 



DEFINE THE FILE INDEXED SEQUENTIAL (DTFIS) TABLE 



Displacement 


Bytes and 
Alignment 


Field Name 


Hex 
Digit 


Description 


Dec 


Hex 








16 


DTFCCB 






2 


2 


1 


DTFCCBB2 






2 


2 




ERREXT 


X'10' 


Accept physical I/O 
error 


16 


10 


1 


FLAGBYTE 












AMODTF 


X'80' 
X'20' 


VSAM bit set to 1 if 
DTF belongs to a 
VSAM data set 
Assign "ignore" bit 


17 


11 


.3 


LOGMODAD 




Address of logic module; 
if AMODTF is set to 1, 
then address of branch 


20 


14 


1 


FILETYPE 




File type 








LOAD 


X'24' 


LOAD-type DTF 








ADD 


X'25 


ADD-type DTF 








RETRVE 


X'26' 


RETRIEVE-type DTF 








ADDRTR 


X'27' 


ADD-RETRIEVE type 
DTF 


21 


15 


.1 


OPTIONS1 




Options byte 1 
(ISAM options) 








BLKDRECS 


X'08' 


Blocked records 


22 


16 


7 


FNAMEDTF 




File name (DDname) 


29 


ID 


.1 


OPTIONS2 




Options byte 2 (not 
used by IIP) 


30 


IE 


..1 


FNAMEC 
LOAD files: 




Status byte 








UNCIOERR 


X'80' 


Uncorrectable DASD 
I/O error 








WRGLEN 


X'40' 


Wrong length record 
(not used by IIP) 








PDARFULL 


X'20' 


No more VSAM data 
space available 








CYLXFULL 


X'10' 


No more VSAM data 
space available 








MASXFULL 


X'08' 


No more VSAM data 
space available 








DUPREC 


X'04' 


Duplicate record 








SEQCHECK 


X'02' 


Sequence check 








PDAROVFL 


x'or 


Prime data area over- 
flow (not used by IIP) 








Non-LOAD 












files: 












UNCIOERR 


X'80' 


Uncorrectable DASD 
I/O error 








WRGLEN 


X'40' 


Wrong length record 
(not used by IIP) 








EOF 


X'20 1 


End of file 








NORECFND 


X'10' 


No record found 








ILLEGID 


X'08' 


Illegal identifier speci- 
fied (not supported by 
IIP) 



DEFINE THE FILE INDEXED SEQUENTIAL (DTFIS) TABLE (. . . .Cont'd) 



Displacement 


Bytes and 
Alignment 


Field Name 


Hex 
Digit 


Description 


Dec 


Hex 








DUPREC 


X'04' 


Duplicate record 








OFARFULL 


X'02' 


No more VSAM data 
space available 








OVFLREC 


X'Ol' 


Overflow record 
(RETRVE) (not used by 
IIP) 


43 


2B 


...1 


RTRBYTE 




RETRVE byte 








WORKR 


X'80' 


WORKR set to 1 if 
WORKR specified 








WORKS 


X'40 - 


WORKS set to 1 if 
WORKS specified 


44 


2C 


4 


AMDTFAD 




Address of AMDTF 


48 


30 


4 


CIPROCAD 




Address if IIP 
processor 


52 


34 


4 


SAVERG 




Save area for one 
register 


56 


38 


4 


PPRETAD 




Return address to 
problem program if 
called from a $$B phase 


60 


3C 


4 


RECLOC 




Address of record for 
LOAD IOREG 


64 


40 


1 


CISWITCH 




IIP switches 








WNKA 


X'80' 


Write-new-key-add 
bit 








RKWK 


X'40' 


Read-key-write-key 
bit 








RK 


X'20' 


Read-key bit 








FIRWITE 


XW 


First write after SETFL 








FIWOK 


X'04 1 


First write is all right 








LD 


X'02' 


LOAD 


74 


4A 


..2 


LRECLEN 




Logical record length 


76 


4C 


2 


KEYLEN 




Key length 


94 


5E 


..2 


KEYLOC 




Key location (not used 
by IIP) 


96 


60 


4 


KARGAD1 




Address of KEYARG, 
moved from part 2 by 
IIPOPEN if RTR SEQ 
with KEY (POINT) or 
RTR RAN is specified 


100 


64 


2 


DSPLPRT2 




Displacement of part 2 
(ADD, RTR) 


102 


66 


..2 


DSPLPRT3 




Displacement of part 3 
(ADD, RTR) 


104 


68 


4 


LDIOREGS 




For RTR SEQ : if 
WORKS=l, then NOP; 
if WORKS=0, then 
L IOREG, RECLOC 


108 


6C 


4 


LDIOREGR 




For RTR RAN : If 
WORKR=l, then NOP; 
if WORKR=0, then 
L IOREG, RECLOC 



DEFINE THE FILE INDEXED SEQUENTIAL (DTF IS) TABLE (....Cont'd) 



Displacement 


Bytes and 


Field Name 


Hex 


Description 


Dec Hex 


Alignment 




Digit 




112 70 


4 


WORK AD 1 




Address of WORKR 
moved from part 2 


116 74 


4 


IOASAD1 




Address of IOAREAS 
moved from part 2 


120 78 


64 


SAVAR1 




For LOAD-type DTF, 
save area for IIPOPEN 


184 B8 


4 


IOARLAD 




Address of IOAREAL 
for LOAD 


188 BC 


4 


DATIWLAD 




Address of data in 
WORKL for LOAD 


192 CO 


4 


KEY1WLAD 




Address of key in 
WORKL for LOAD 


200 C8 




MIXEXTI 




Master index extension 
indicator for LOAD 






CROREXT 


X'10' 


Create-extend bit 
(create=0; extend=l) 


204 CC 


4 


WORKLAD 




Address of WORKL 
for ADD 


224 E0 


2 


KLM1 




KEYLEN-1 for LOAD 


Part 2 of DTF 


8 8 


4 


IOASAD2 




Address of IOAREAS 


12 C 


4 


IORAD 




Address of IOAREAR 


16 10 


4 


KARGAD2 




Address of KEYARG 


20 14 


4 


WORKRAD2 




Address of WORKR 


24 18 


4 


CURIOAAD 




Address of current 
sequential I/O area 


28 IC 


4 


LIOREGS 




L IOREG, MorNOP 
(RTR SEQ) 


68 44 


2 


NTAGRECS 




Number of records 
tagged for deletion 


70 46 


..2 


LIOREGR 




LR IOREG, or NOP 
(RTR RAN) 


Part 3 of DTF 





64 


SAVAR2 




Save area for IIPOPEN, 
not LOAD type 



EXIT LIST (EXLST) 



Displace 


Tient 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










1 


EXL1D 




Control block 
identifier-X'Sl' 



1 



1 


1 

1 


EXLIDD 
EXACT 


X'81' 


EXLST identifier equate 
Active byte test and set 
X'00' VSAM Release 1 
X'10'VSAM Release 2 
X'20' VTAM 


2 


2 


2 


EXLLEN 




Length of EXLST 


4 


4 


1 






Reserved 


5 


5 


5 


EX LOAD 




EODAD entry 


5 


5 


1 


EXLEODF 




Entry description bits 


6 


6 


4 


EXLEODP 




Address of the EODAD 


10 


A 


5 


EXLSYN 




SYNAD entry 


10 


A 


1 


EXLSYNF 




Entry description bits 


11 


B 


4 


EXLSYNP 




Entry of the SYNAD 
exit routine 


15 


F 


5 


EXLLER 




LERAD entry 


15 


F 


1 


EXLLERF 




Entry description bits 


16 


10 


4 


EXLLERP 




Address of the LERAD 


20 


14 


5 


EXLIOEX 




EXCPAD entry 


20 


14 


1 


EXLIOEXF 




Entry description bits 


21 


15 


4 


EXLIOEXP 




Address of the EXCPAD 
exit routine 


25 


19 




EXLJRN 




JRNAD entry 


25 


19 




EXURNF 




Entry description bits 


26 


1A 




EXLJRNP 




JRNAD pointer 


Bits used 


in indiv 


idual exit f 


ags in bytes show 


n as entry de 


scription 








EXENEXB 


X'80' 


Entry present bit 








EXENACTB 


X'40' 


.. Entry active bit 








EXENLEB 


X'20' 


Load bit 


Minimum 


length 


EXLST for sp 


ecified entry: 












EXLEODL 


Dec. 
Diqit 


Minimum length if EODAD 


10 








EXLSYNL 


15 


Minimum length if SYNAD 








EXLLERL 


20 


Minimum length if LERAD 








EXLIOEXL 


25 


Minimum length if EXCPAD 








EXLJRN 1 


30 


Minimum length if JRNAD 


Minimum 


and ma 


ximum size c 


f EXLST : 












EXLMINL 


10 


Minimum length of EXLST 








EXLMAXL 


30 


Maximum length of EXLST 



EXTENT DEFINITION BLOCK (EDB) 



Displa 


cement 


Bytes ' 


Field Name 


Hex 
Digit 


Description 


Dec 


Hex 








4 


EDBNEDB 




Address of next EDB 


4 


4 


2 


EDBSYMU 
EDBSUCLS 
EDBSUNUM 




Symbolic unit (for CCB) 
Symbolic unit class 
Symbolic unit number 


6 


6 


2 


EDBNUMTR 




Number of tracks of 
extent 


8 


8 


1 


EDBFLGS 




Flags 








EDBDWSS 


XW 


Data RBA with sequence 
set 








EDBSSWD 


X'40' 


Sequence set RBA with 
data 








EDBIXREP 


X'20' 


Index replication 








EDBMNT 


X'10' 


Volume mount flag 








EDBLGCC 


X'08' 


Device contains more 
than 256 cylinders 








EDBRPS 


X'04' 


Indicates RPS Device 


9 


9 


3 


EDBMBB 




EDB 


9 


9 


1 


EDBM 




Extent(M) 


10 


A 


2 


EDBBB 




Bin number (BB) 


12 


C 


8 


EDBXTNT 




Force low and high 
CCHH next to each other 


12 


C 


4 


EDBLCCHH 




Low cylinder and head 


12 


C . 


2 


EDBLCC 




Lowest cylinder 


14 


E 


2 


EDBLHH 




Lowest head 


16 


10 


4 


EDBHCCHH 




High cylinder and head 
numbers 


16 


10 


2 


EDBHCC 




Highest cylinder 


18 


12 


2 


EDBHHH 




Highest head 


20 


14 


4 


EDBLPMBA 




Address of associated 
LP MB 


24 


18 


4 


EDBPARDB 




Address of ARDB 


28 


1C 


2 


EDBVLSQ 




Index to the VOLSER list 


30 


IE 


2 


EDBSTTRK 




Relative track address of 
extent 


32 


20 


8 


EDBRBAS 




Force low and high RBAs 
next to each other 


32 


20 


4 


EDBLORBA 




Low RBA limit 


36 


24 


4 


EDBH1RBA 




High RBA limit 



FIELD PARAMETER LIST (CTGFL) 



Disc 


lacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 








1 



1 


1 
1 
X'00' 

X'nonOO' 

X'80' 
X'60' 
X'20' 
X'40' 
X'AO' 
X'CO' 
X'80' 
X'10' 
X'40' 


CTGFLDNO 
CTGFLDCD 


Number of entries in CTGFLDAT 

Test condition : 

The FPL describes a field to be 

updated or retrieved. The FPL is 

pointed to by the caller's CTGPL 

(CTGFIELD entry). 

The FPL describes a test condition. 

The FPL is pointed to by another FPL. 

Test condition : 

Equal 

Not equal 

Greater than 

Less than 

Greater than or equal 

Less than or equal 

Test under mask for zeros 

Test under mask for ones 

Test under mask for mixed 


2 


2 


1 


CTGFLDGC 


Group code number 


3 


3 


1 



1 


CTGFLDRE 


Test results : 
Reserved 
Successful test 
Test failed 


4 


4 


4 


CTGFLDWA 


Work area : contains information about 
the catalog record's field name from 
the dictionary 


8 


8 


4 


CTGFLDNM 


Address of the field name 


1? 


C 


4 


CTGFLCHN 


Address of next field macro or zero 


16 


10 




CTGFLDAT 


Pairs of data length/address 


16 


10 


4 


CTGFLNG 


Data length and address in the 
callers work area of 


20 


14 


4 


CTGFLPT 


• Each field that was retrieved, if 
the request was LOCATE or CMS 
LIST-CAT 

• New data to replace or add to data 
in the catalog record. The request 
was UPDATE, CMS DEFINE or CMS 
ALTER 

• Data used to compare to catalog 
record fields, if the FPL Is a FPL- 
for-tests. 



FIELD VECTOR TABLE (CTGFV) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 












1 


CTGFVTYP 


The CTGFV contains information used 
by the CMS Define routines to build 
a catalog record of the type : 






C"A« 


CTGFVALN 


NonVSAM 






C"C" 


CTGFVCL 


Cluster 






C"D" 


CTGFVDTA 


Data 






or 


CTGFVIDX 


Index 






C"V" 


CTGFWOL 


Volume 






C"G" 


CTGFVAIX 


Alternate Index 


1 


1 


C"R" 

1 

1 

.1 


CTGFVPTH 
CTGFVPRO 
CTGFVAVL 
CTGFVRVL 


Path 
CMS processing option flags : 
ALTER : Add volumes 
ALTER : Remove volumes 
Reserved 


2 


2 


1 


CTGFVELM 


Element number of CMSPCATR 


3 


3 


1 




Reserved 


4 


4 


4 


CTGFVDCH 


Address of the cluster's data set FVT 


8 


8 


4 


CTGFVICH 


Address of the cluster's index FVT 


12 


C 


4 


CTGFWCH 


Address of the space vector table 


16 


10 


4 


CTGFVIND 


Address of the associated DLBL 
statement 


20 


14 


4 


CTGFVENT 


Address of the entry name FPL 


24 


18 


4 


CTGFVSTY 


Address of the security information 
FPL (passwords, codewords, and 
number-of -tries) 


28 


1C 


4 


CTGFVOWN 


Address of the owner odentification FPL 


32 


20 


4 


CTGFVEXP 


Address of the expiration date FPL 


36 


24 


4 


CTGFVCRE 


Address of the creation date FPL 


40 


28 


4 


CTGFWLT 


Address of the volume serial number list 


44 


2C 


4 


CTGFVRNG 


Address of the key range list 


48 


30 


4 


CTGFVDVT 


Address of the/device type FPL (for 
NonVSAM DEFINE only) 


52 


34 


4 


CTGFVSPC 


Address of the space allocation 
information FPL 


56 


38 


4 


CTGFVAMD 


Address of the AMDSB FPL (if VSAM 
DEFINE) 


56 


38 


4 


CTGFVFSN 


Address of the file sequence number 
(if NonVSAM DEFINE) 


60 


3C 


4 


CTGFVATR 


Address of the data set attributes FPL 


64 


40 


4 


CTGFVBUF 


Address of the buffer size FPL 


68 


44 


4 


CTGFVLRS 


Address of the average record size FPL 


71 


48 


4 


CTGFVEXT 


Address of exception exit 


76 


4C 


4 


CTGFVNAM 


Address of related object 


80 


50 


4 


CTGFVUPG 


Address of RGATTR FPL 


84 


54 


4 


CTGFVWKA 


Address of CRA volume identification 


88 


58 


4 


CTGFVPWD 


Relationship password 



LOGICAL-TO-PHYSICAL MAPPING BLOCK (LPMB) 



Displacement 


Bytes 


Field Name 


Hex 
Digit 


Description 


Dec 


Hex 




1 




1 


1 

1 


LPMID 
LPMBDTF 


X'FF' 


Control block identifier 
Device type 
indicator 


2 


2 


2 


LPMLEN 




Length of the LPMB 


4 


4 


4 


LPMBPTRK . 




Number of bytes per 
track 


8 


8 


4 


LPMCASZ 




Number of bytes per 
control area 


12 


C 


4 


LPMBLKSZ 




Physical block size 


16 


10 


2 


LPMTRKCA 




Number of tracks per 
control area 


18 


12 


2 


LPMTPC 




Number of tracks per 
cylinder 


20 


14 


2 


LPMNBQBK 




Number of physical 
records per track 


22 


16 


2 


LPMBPBCI 




Number of blocks 
per CI 



OPEN WORK AREA (IKQOPNWA) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 














WACOMMON 


Common Open/Close work area 




1 




1 


.i" .... 

...i .... 
.... l... 

i.. 

i. 

i 


WAFLAG 

TCLOSE 

CLOSE 

OPEN 

OPAMDINX 

VOLFOUND 

SSFLAG 
RETRY 

FILEPROT 
WAERCODE 


Flag byte : 

Work area for TCLOSE 

Work area for CLOSE 

Work area for OPEN 

Index AMDSB is being processed 

Volume serial number is in label 

cylinder record 

Sequence set with data 

Catalog should be reupdated by 

CLOSE 

DOS Supervisor DASD file protect 

Error condition code 


2 


2 


2 


WALEN 


Length of GETVIS area 


4 


4 


4 


WAP IBS V 


Address of partition user save area, 
copy of user PSW, registers 


8 


8 


4 


WALISTP 


Address of user ACB/DTF list 


12 


C 


2 


WACOMR 


Address of DOS communication 


14 


E 


1 


EDBCODE 


One GETVIS obtains enough space 
for 3 EDBs; this field is used to 
count EDBs 


15 


F 


1 




Reserved 


16 


10 


4 


CATEXTPT 


Pointer to extent information in 
order to build EDBs 


20 


14 


2 


CATEXTLN 


Length of total extents 


22 


16 


2 


EXTNUMB 


Number of extents 


24 


18 


80 


USERS AVE 


Room to save user PSW and registers 


104 


68 


4 


WACOMEND 


End of common work area 


104 


68 




OWA 


Partial map of work area obtained 
by GETVIS issued by SSBOVSAM 


104 


68 


4 


WAVSLOD 


Address of location where VSAM 
has been placed by CD LOAD 
(set by SSBOVSAM) 


108 


6C 


4 


WAIKQLAB 


Address of location where 1KQLAB 
has been placed by CD LOAD 
(set by SSBOVSAM) 


112 


70 


4 


WARACB 


Pointer to ACB being opened 


112 


70 


4 


CLWAAD 


Close work area address saved 


116 


74 


1 


LBLRCLEN 


Length of work area pointed to by 
LABICPTR in multiple of 128 


117 


75 


3 


LABICPTR 


Pointer to work area reserved for 
label record 


120 


78 


4 


SVCATACB 


Pointer to catalog ACB 


124 


7C 


4 


CTGPLPTR 


Pointer to catalog parameter list 
(CPL) 


128 


80 


4 


CATWKPTR 


Pointer to catalog work area 
(CTGWA) (contents moved to CPL) 


132 


84 


4 


OLDEDB 


Address of last EDB 


136 


88 


4 


NXTEDB 


Address to next EDB 



OPEN WORK AREA (IKQOPNWA) (.. .Continued) 



Displacement 
Dec Hex 


Bytes and 
Bit Pattern 


Field Name 


Description 


Catalog Field List for AMDSB 


140 8C 

140 8C 

140 8C 
144 90 
144 90 
148 94 
148 94 
148 94 
152 98 
156 9C 
160 A0 


8 

4 

4 
4 
4 
4 
4 
4 
4 
4 
4 


FLAMDSB 

SAVE RE Tl 

RETREG1 

SAVERET2 

RETREG2 

FLAMDSBN 

RETREG3 

WAAMBLIX 
FLAMDSB L 
FLAMDSBA 


.Catalog field list work area 
(CTGFLDWA) for AMDSB 
Pointer to contents of return 
register (R14) if not catalog call 
Return address to save area 1 
Return address to save area 2 
Return address to save area 2 
Pointer to catalog field name 
AMDSB CAT 

Pointer to index AMDSB 
Length of AMDSBCAT 
Address of AMDSBCAT 


Catalog Field List for Volume Entry(ies) 


164 A4 
164 A4 

166 A6 

172 AC 
176 B0 
176 B0 
180 B4 
184 B8 


8 
2 

2 

4 
4 
4 
4 
4 


FLENTVOL 
KRNKEYS 

KRNVOLS 

FLVOLNTN 

SVLENG 

VOLENTLN 

VOLGPPTR 


No. of key ranges equals number 

of ARDBs 

Number of volumes for this key 

range 

Volume entry name VOLE NT 

Length of ENTVOL 
Length of volume entry 
Address of VOLE NT data 


Catalog Field List for Data Set Attributes 


188 BC 20 
208 DO 4 


FLDSATRA 


DSATTR field list 
Base of DSATTR 


Catalog Field List for Open Indicator 


212 D4 
220 DC 
224 E0 
228 E4 
232 E8 


8 
4 
4 
4 
4 


FLOPNIND 
FLOPNINN 

FLOPNINL 
FLOPNINA 


Locate OPENIND and test for UPD 
Open indicator field list 

Length of OPENIND 
OPENIND address 


Catalog Field List for Minimum Buffer Size 


236 EC 
256 100 


20 
4 


FLBUFSZA 


Flags, etc., for BUFSIZE 
Base of BUFSIZE 


Catalog Field List for High-Used RBA per Data Set 


260 104 
260 104 
280 118 


20 
20 
4 


NVOLLIST 
FLHURDSA 


Miscellany for HURBADS 
No. of volumes per key range 
Base for HURBADS 



Multi-use field 



OPEN WORK AREA (IKQOPNWA) (. . . .Cont'd) 



Displacement 


Bytes and 
Bit Pattern 


Field Name 


Description 


Dec Hex 


Catalog Field List for ISAM Compatibility (USERINFO) 


284 11C 
304 130 


20 

4 


FLFILTA 


CATFILT field list 
Base for CATFILE 


Catalog Field List for Names of Related Data Sets 


303 134 
308 134 
308 134 
312 138 
316 13C 
320 140 
324 144 
324 144 
328 148 
328 148 


8 
8 
4 
4 
4 
4 
4 
4 
4 
4 


FLNAMEDS 

PARMLIST 

PARM1 

PARM2 

FLNAMDSN 

FLNAMDSL 
NAMEDSLN 
NAMEDSPT 
FLNAMDSA 


Flags for NAMEDS 
IKQVLAB parameter list 
ACB address 
LAB ICPTR address 
Pointer to 'NAMEDS' 

Length of associated names 
Length of associated names 
Address of NAMEDS entry 
Address of NAMEDS groups 


Catalog Field List for Entry Type and Control Interval No. 


332 14C 
340 154 
344 158 
348 15C 
352 160 


8 

4 
4 
4 
4 


FLMISCLN 

FLM1SCLL 
FLM1SCLA 


CTGFLDWAfor this field list 
Pointer to 'DSTYPNAM' 

Length of DSTYPNAM 
Address of DSTYPNAM 


Catalog Field List to Find Catalog ACB Address 


356 164 
376 178 


20 
4 


FLCTACBA 


Field list nr. 10 for catalog ACB 
Pointer to catalog ACB pointer 


Catalog Field List to Test for Write of Open Indicator 


380 17C 
380 17C 
384 180 
388 184 
392 188 
396 18C 
400 190 


8 

4 
4 
4 
4 
4 
4 


FLWOPNND 
TSTENTVL 
TSTENTLN 
FLWOPNNN 

FLWOPNNL 
FLWOPNNA 


Update OPENIND field list 
Address of test ENTVOL (scan) 
Address of end scan ENTVOL 
Pointer to 'OPENIND' 

Length of data 
Pointer to data 


Catalog Field List for Volume Time Stamp 


404 194 
404 194 
424 1A8 


24 

4 


FLTMSTVF 
FLTMSTVA 


VOLTSTMP field list 
Pointer to 'VOLTSTMP' 



Multi-use field 



OPEN WORK AREA (IKQOPNWA) (...Cont'd) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






End of Catalog 


Field List for ^ 


/olume Time Sta 


np 


428 


1AC 


1 


WARNFLG 


Used to save warning error code 


429 


IAD 


1 


* 




430 


1AE 


2 


1 


Index for DO loops 


432 


1B0 


2 


LIMIT 


Count of ENTVOLS (pointed to by 
VOL20PT) 


434 


1B2 


2 


RELGP 


Relative group number in the 
catalog 


436 


1B4 


2 


TEMP 


Local calculations (on same 
listing page) 


438 


1B6 


2 


IARDB 


Index for ARDB list 


440 


1B8 


4 


SAVDEV 


Used to save device type 


444 


1BC 


4 


SAVDEV2 


Used to save sequence set device 
type 


448 


1C0 


2 


SAVTRKAU 


Used to save number of tracks per 
allocation unit (control area) to 
help identify type of LP MB 


450 


1C2 


2 


SAVIRKA2 


Same as SAVTRKAU but used only 
if sequence set with data 


452 


1C4 


4 


RLPMB2 


Pointer to sequence set (index) 
LPMB 


456 


1C3 


1 

1 

.1 

..1 

...1 .... 

.... 1... 

1.. 

1. 


OWAFLAGS 
OWFLAGZB 

OWFLAGBF 
OWFLAGIB 
WARSOPEN 

DTACNT 
IDXCNT 
WARSCTLG 


Open flags and switches 

User did not specify buffer size 

inACB 

BCB building in process 

Got buffer with AMBL for index 

Use macro has been issued for 

SYSOPEN (RELEASE macro must 

subsequently be issued) 

Open count in look-aside table 

is bumped for data 

Open count in look-aside table 

is bumped for index 

USE macro has been issued for 

SYSCTLG (RELEASE macro must 

subsequently be issued) 

Reserved 


457 


1C9 


3 


INDEXSAV 


Used to save index file name 


460 


ICC 


1 


SAVTYPE 


Used to save entry type when 
entry is not a cluster 


461 


1CD 


2 


* 


Reserved 


463 


ICF 


4 


TESTSV1 


Save word for testing 


467 


1D3 


1 

1 


SVOPNIN 
SVOPNINO 


Updated OPENIND for catalog 
Flag open for output 
Reserved 


468 


1D4 


2 


SVNEXTNT 


Save number of EXTENT statements 


470 


1D6 


2 


SETNBUF 


Count of buffers (used by SETADDR) 


472 


1D8 


4 


VOLSTPTR 


Address of IDAVLST 


476 


IDC 


4 


VOLENTND 


End of allENTVOLs 



OPEN WORK AREA (IK QOPNWA) (...Cont'd) 





Displa 


cement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






480 


1E0 


2 


VOLE NT CT 


Count of volume entries 


482 


1E2 


2 


IVOLS 


Working index of VOLENTs 


484 


1E4 


4 


VOL20PT 


Pointer to volume entries to sort 
(address of VOLENT20 if less 
than 20) 


488 


1E8 


80 


VOLENT20 


Volume entries to sort 


568 


238 


4 


VMPTR 


Pointer for right VOLSER 


572 


23C 


4 


REQBUFSP 


Minimum buffer space required 


576 


240 


4 


CURBUFSP 


Currently specified buffer space 


580 


244 


4 


CURBFSPD 


Current buffer space specified for data 


584 


248 


4 


ADDAREA 


Room to add without current 
specifications for index 


584 


248 


4 


CURBFSPI 


Current buffer space specified for index 


588 


24C 


1 


SVLUBPUB 


Save index of PUB 


589 


24D 


1 


NEXT J IB 


Next JIB saved 


590 


24E 


10 


SVPUB 


LUBs for mounted volumes 


600 


258 


2 


IPUB 


Index for SVPUB 


602 


25A 


4 


WRKCINV 


Control interval size used in 
pointing BCBs to buffers 


606 


25E 


8 


OWAPRTCT 


Room to build password 


616 


268 


12 


PARM 


Parameter list for IKQLASMD 


616 


268 


1 


CALLERID 


Caller identification 


617 


269 


7 


DSID 


Data set identification 


617 


269 


3 


DSCI 


Control interval number 


620 


26C 


4 


CTACBPTR 


Pointer to catalog ACB 


624 


270 


1 


SHAREOPT 


Share option from catalog 


625 


271 


1 




Reserved 


626 


272 


2 


OUTCNT 


Number of output users, returned 
from IKOLASMD 


628 


274 


72 


OWPLSAVE 


Save area formatted according to 
PL/S standards 


700 


28C 


72 


OWPLSAV2 


Save area 2 formatted according to 
PL/S standards 


772 


304 


80 


DUMCATPL 


Room for catalog parameter list 


852 


354 


512 


OWACTWKA 


Normal catalog work area 


1364 


554 


8 


CCWX 


CCW definition 


1364 


554 


1 


CCWCODE 


Write-to-console op code 


1365 


555 


3 


CCWDTA 


Pointer to message buffer 


1368 


558 


2 


* 




1370 


55A 


2 


CCWCNT 


Length of message buffer 


1372 


55C 


24 


CCBX 


CCB definition 


1372 


55C 


9 


* 




1381 


565 


3 


CCWPT 


Pointer to channel program (CCWX) 


1396 


574 


65 


VMSG 


Volume name is built and used as part 
of calling parameter when catalog 
Is called to get the time stamp 


1396 


574 


65 


MSG 


Volume time stamp built 


1396 


574 


11 


MSG1D 


Message identification 



OPEN WORK AREA (IKQOPNWA) ( Cont'd) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pcttern 






1407 


57E 


8 


MSGDSN 


Data set name 


M15 


587 


46 


MSGTXT 


Message text 


1461 


5B5 


3 


* 




1464 


5B8 


4 


OWSTRTGV 


Start of GETVIS 


1468 


SBC 


4 


UACBAD 


User ACB address 


1472 


5C0 


4 


OWAOAL 


Address of OAL section 


1476 


5C4 


4 


AIXACBAD 


AIX cluster ACB address 


1480 


5C8 


4 


BCACBAD 


Base cluster ACB address 


1484 


5CC 


4 


RPLPAD 


RPL pool just handled 


1488 


5D0 


4 


PLHADDR 


Address of first PLH 


1492 


5D4 


2 


NRPL 


Number of user strings 


1494 


5D6 


2 


AIXBCLEN 


GETVIS length for ACB/RPL 


1496 


5D8 


4 


US BAD 


Pointer to USB 


1500 


5DC 


2 


UPGRM 


Members in upgrade set 


1502 


5DE 


2 


UPGRCT 


Upgrade set loop counter 


1504 


5E0 


4 


UPACBAD 


ACB of upgrade member 


1508 


5E4 


4 


AIXBUFAD 


Upgrade buffer pool 


1512 


5E8 


4 


AIXBUFLN 


Length of upgrade buffer pool 


1516 


5EC 


2 


AIXUPLEN 


Length of upgrade set 
(RPL + PLH) 


1518 


5EE 


2 


* 




1520 


5F0 


24 


FLRGATTR 


Field list RGATTR 


1520 


5F0 


16 


* 




1536 


600 


4 


* 


Length 


1540 


604 


4 


FLRGATRA 


Pointer to RGATTR 


1544 


608 


24 


FLEXCPEX 


Field list exception exit 


1544 


608 


16 


* 




1560 


618 


4 


FLEXCEPL 


Length 


1564 


61C 


4 


FLEXCEPA 


Address 


1568 


620 


4 


OWAUCPL 


Pointer for IKOLAB 


1572 


624 


24 


MSGPARMS 


Parameter list for IKQOCMSG 


1596 


63C 


2 


MSGFLGBT 


Message flag byte 


1598 


63E 


J 

.1 

..1 

.... 1... 

1.. 

1. 

1 


AIXFLG 
AIXUPGR 
AIXBASE 
AIXPE 

AIXPATH 
AIXMUS 
AIXEUO 
AIXUSERR 


Alternate index flags 

Upgrade set available 

Base cluster handled 

Path entry handled 

Reserved 

Path structure open 

Member of upgrade set handled 

AIX as and-use object 

Upgrade set error 


1599 


63F 




AIXFLG2 
AIXTHB 


Alternate index flags 2 
THB for upgrade set 
Reserved 


1600 


640 


.'xxxxxxx 


PATHFLG 
PFLUPD 


Path flags 
Update option 
Reserved 



Multi-use field 



OPEN WORK AREA (IKQOPNWA) (. . . Cont'd) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






1601 


641 


..1 

...1 .... 
.... 1... 

XXX 


RESETSW 

ESDSERR 

OALEFND 

JRNACT 

CATOPEN 


Flag byte 

Switch for reset 

ESDS error flag 

OAL entry found 

JRNAD activ 

Catalog open in procedure 

Reserved 


1602 


642 




SAVAIX 


Save area for AIXFLG 


1603 


643 


2 


AIXUSAV 


Save area for AC8 option 


1605 


645 


3 


AIXYENTR 


Internal address of y-entry 


1608 


648 


3 


AIXDNAM 


AIX data name 


1611 


64B 


3 


AIX1NAM 


AIX index name 


1614 


64E 


3 


BCDNAM 


Base cluster data name 


1617 


651 


3 


BCINAM 


Base cluster index name 


1620 


654 


3 


CLUNAME 


Cluster name save area 


1623 


657 


8 


NAMEFLD 


Ike RELSE parameter list 


1631 


65F 


72 


OWPLSAV3 


Third level save 


1703 


6A7 


80 


INTCPL 


Internal CPL 


1783 


6F7 


5 


INTWA 


Internal catalog work area 


1788 


6FC 


512 


OWA2 


Work area 


1788 


6FC 


512 


OWAUCAT 


IKQCAT work area for UCAT 


1788 


6FC 


512 


USCTGWA 


Catalog work area in IKQOPNUS 


1788 


6FC 




OWAMSGAR 


Message work area 



Multi-use field 



PLACEHOLDER (PLH) 



Offset 
Dec Hex 


Bytes 


Field Name 


Hex 
Digit 


Description 


Standard Save Area 



- 

4 4 

8 8 
12 C 


72 

4 
4 

4 
60 


PLHSAREA 
PLHSADDR 

PLHSAVE 




Register save area 

Reserved 

Address of user's save 

area 

Reserved 

Save area for 15 registers 

(Reg. 0-1 4) 


Buffer Manager and I/O Manager Save Area 


72 48 


44 


PLHBSAVE 




Buffer manager and I/O 
manager save area 
(Reg. 9-14 and Reg 0-4) 


Index Search and Get Next Save Area 


116 74 
164 A4 


48 
16 


PLHIXSSV 
PLHJRNSV 




Index search and get next 
save area 
JRNAD save area 


Return Register Stacks 


180 B4 
180 B4 
184 B8 


8 
4 
4 


PLHSTCK 
PLHSTCK1 
PLHSTCK2 




Fixed return register stack 
Return register from level 1 
Return register from level 2 


RPL Pointers 


188 BC 
192 CO 


4 
4 


PLHHRPL 
PLHCRPL 




Pointer to header RPL 
Pointer to current RPL 


PLH ECB 


196 C4 

196 C4 

197 C5 

198 C6 

199 C7 


4 
1 
1 
1 

1 


PLHECB 

PLHAUSE 
PLHECOM 
PLHEWAIT 
PLHECBT 


X'80' 


Event control block 

Reserved 

Request active on PLH 

Communications byte 

Wait flag on ECB 

Test and set byte for ECB 


PLH Work Area 


200 C8 


44 


PLHWAREA 




PLH work area 


PLH Identification Byte 


244 F4 


1 


PLHID 


X'55' 


PLH identification byte 


PLH Use Gate 


245 F5 


1 


PLHUSE 




PLH use gate 



PLACEHOLDER (PLH) (...Continued) 



Offset Bytes 

Dec Hex 



Field Name Hex 

Digit 



PLH Condition Flc 



246 F6 1 



247 F7 1 



PLHFLAG 
PLHST 



PLHPOS 
PLHEOD 

PLHWAIT 
PLHSKIP 

PLHRST 
PLHFST 
PLHRREAD 

PLHFLG 



PLH condition flags 
PLH status flag (bit 0) 
1 - PLH set 

- PLH invalid 

PLH position flag (bit 1) 

1 - Next record 

- previous record 

PLH end-of-date-condition 
flag (bit 2) 

1 - EOD reached 

- Not EOD 

PLH wait flag (bit 3) 

1 - I/O pending 

- No I/O pending 
PLH skip flag (bit 4) 

1 - Skip control interval 

- Don't skip control 

interval 
PLH restart flag (bit 5) 

1 - Restart 

- No restart 

PLH first-time flag (bit 6) 

1 - First time 

2 - Not first time 
PLH exclusive control 
reread flag (bit 7) 

1 - Need reread 

- Reread not needed 

PLH spare condition flag 



PLH Communivation Switches 



248 F8 1 



PLHSW1TCH 




PLH communication switcr 


PLHLOAD 


X'80' 


PLH load or resume load 
indicator 


PLHKRCH 


X'40' 


PLH key range change 
indicator 


PLHMSRT 


X'20' 


Mass insert indicator 


PLHFSR 


X'10' 


First request for data set 
indicator 


PLHSTBCB 


X'04' 


Demand a BCB from 
STEALOOO(IKQBFAOO) 


PLHEC 


X'02' 


Exclusive control needed 



PLACEHOLDER (PLH) (...Continued) 



Offset 
Dec 


Hex 


Bytes 


Field Name 


Hex 
Digit 


Description 


Previous Request Characteristics 


249 
249 
250 
250 
251 


F9 
F9 
FA 
FA 
FB 


3 

1 
2 

1 
1 


PLHPREO 
PLHRTC 
PLHOPT 
PLHOPT 1 
PLHOPT2 




Previous request information 
Previous request-type code 
Previous request option bytes 
First option byte 
Second option byte 


Multiple String Support 


252 
253 

254 

255 


FC 
FD 
FE 

FF 


1 
1 
1 

1 


PLHSTRID 
PLHENDRQ 
PLHINDS 
PLHCLOSE 


X'80' 


PLH string ID (1-255) 
ENDREQ request gate byte 
Indicator byte 

Close-type ENDREQ request 
Reserved 


EXCPAD Parameter List Pointer 


256 


100 


4 


PLHPARML 




EXCPAD parameter list 


JRNAD Parameter List Pointer 


260 


104 


4 


PLHAJRN 




JRNAD paramafer list 


I/O Manager Entry Point 


264 


108 


4 


PLHIOMGR 




I/O Manager (IKQIOA00) 
entry point 


Key Range Support Fields 


268 
272 


10C 
110 


4 
4 


PLHDCRDB 
PLHDTRDB 




Address current ARDB 
Address target ARDB 


Pointers to Buffer Headers (BHDs) 


276 
280 
284 
288 

292 


114 
118 
11C 
120 

124 


4 
4 
4 
4 

4 


PLHDBHD 
PLHIBHD 
PLHBRPL 
PLHTHB 




Address of data BHD 
Address of index BHD 
Save header RPL 
Address of THB (share 
option 4) 
Reserved 


Data PLH 


296 
296 
296 
300 
300 


128 
128 
128 
12C 
12C 


36 
20 
4 
8 

4 


PLHDATA 
PLHDCNV 
PLHDRBA 
PLHDBUF 
PLHDBCB 




Data PLH 

Data CNV information 

Data CNV RBA 

Data buffer description 

Address of data BCB 



PLACEHOLDER (PLH) (...Cor 



Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




304 


130 


4 


PLHDBAD 




Address of data buffer 


308 


134 


4 


PLHDCIDE 




Data CNV CIDF 


308 


134 


2 


PLHDFSO 




Data CNV free space offset 


310 


136 


2 


PLHDFSL 




Data CNV free space length 


312 


138 


1 


PLHDSW 




Data CNV switches 








PLH HOLD 


X'80' 


Track hold indication 








PLH HELD 


X'40 1 


Track free indication 








PLHNORD 


X'10' 


No read indication 








PLHLOG 


X'08' 


Logical GETBUFF request 








PLHRAHD 


X'04 1 


Read-ahead request 


313 


139 


1 


PLHDSW1 




Buffer request control switch 








PLHEHOLD 


X'80' 


Exclusive control desired 








PLHEHELD 


X'40' 


Exclusive control held 








PLHEACTV 


X'20' 


Exclusive control active 


314 


13A 


2 


PLHDCSZ 




Data CNV size 10 
(rightmost RDF) 








Data Record D 


jscription 




316 


13C 


16 


PLHDRCD 




Data record description 


316 


13C 


2 


PLHDRO 




Data record offset 


318 


13E 


2 


PLHDRDF 




Data record RDF-offset 


320 


140 


2 


PLHDR1X 




Data record RDF-index 


322 


142 


2 






Spare 


324 


144 


4 


PLHDRRBA 




Data record RBA 


328 


148 


4 


PLHDRL 




Data record length 








Read -Ahead D 


3ta PLH 




332 


14C 


24 


PLHBDATA 




Data read ahead PLH 


332 


14C 


4 


PLHBRBA 




RBA of next CNV to read 
ahead 








Read-Ahead D 


jta CNV Desc 


ription 


336 


150 


10 


PLHBDCNV 




Read-ahead data CNV 
information 


336 


150 


4 


PLHBDRBA 




Data CNV RBA 


340 


154 


8 


PLHBDBUF 




Data buffer description 


340 


154 


4 


PLHBDBCB 




Address of data BCB 


344 


158 


4 


PLHBDBAD 




Address of data buffer 


348 


156 


4 


PLHBDCDF 




Data CNV CIDF 


348 


15C 


2 


PLHBDFSO 




Data CNV free space offset 


350 


15E 


2 


PLHBDFSL 




Data CNV free space length 


356 


160 


1 


PLHBDSW 




Data CNV switches 


353 


161 


1 


PLHBDSW1 




Buffer request control switch 


354 


162 


2 


PLHBDCSZ 




Data CNVsize-10 



PLACEHOLDER (PLH) (. . .Continued) 



Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




Alternate Index Record Information 


356 


164 


16 


PLHAIX 




A IX record information 


356 


164 


4 


PLHAIXPT 




Address of base cluster 
pointer 


360 


168 


4 


PLHAIXWA 




Pointer to work area 


364 


16C 


4 


PLHAIXWL 




Work area length 


368 


170 


2 


PLHAIXPN 




Counter of base cluster 
pointer 


370 


172 


2 


PLHAIXOP 




RPL Option bytes 


372 


174 


12 


PLHUPG 




Upgrade set information 


372 


174 


4 


PLHUPGP1 




Current USB entry address 


376 


178 


4 


PLHUPGP2 




Last USB entry address 


380 


17C 


4 


PLHUPGAD 




Address of prime key 
(KSDS) or RBA (ESDS) of 
base cluster record 


384 


180 


24 


PLHAIXSV 




AIX save area 


Spanned Record Flag Byte 


408 


198 


1 


PLHSWT2 




Spanned record switch byte 








PLHSPAN 


X'80' 


Spanned record indicator 








PLHSRU 


X'40' 


Called from iKQSRU 








PLHSRUF 


X'20' 


First call from IKQSRU 








PLHSRUL 


X'10' 


Last call from IKQSRU 








PLHSRCAS 


X'08' 
X'04' 


CA-split necessary 
Reserved 








PLHSREC 


X'02' 
X'Ol' 


Exclusive control indicator 
Reserved 


JRNAD Flag Byte 


409 


199 


1 


PLHJRN 




JRNAD flag byte 








PLHJRACT 


X'80' 


JRNAD exit active 








PLHJRVSM 


X'40' 


JRNAD called from 
IKQVSM 








PLHJRMDY 


X'20' 


JRNAD called from 
IKQMDY 








PLHJRCIS 


X'10' 


JRNAD called from IKQCIS 








PLHJRCA1 


X'08' 


JRNAD first call from 
IKQCAS 








PLHJRCA2 


X'04" 


JRNAD second call from 
IKQCAS 








PLHJRSRG 


X'02' 


JRNAD called from 
IKQSRG 








PLHJRSRU 


x-or 


JRNAD called from 
IKQSRU 



PLACEHOLDER (PLH) (. . . Continued) 



Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




Spanned Record Information 


410 


19A 


2 


PLHSRCNT 




Number of segments 


412 


19C 


22 


PLHSPREC 




Spanned record information 


412 


19C 


8 


PLHRCD 




Spanned record description 


412 


19C 


4 


PLHAREA 




Pointer to user area 


416 


1A0 


4 


PLHRLEN 




Length of spanned record 


420 


1A4 


4 


PLHSRRBA 




RBA of record 


424 


1A8 


2 


PLHX1E0 




Index entry offset of l.part 


426 


1AA 


2 


PLHXPTR 




Pointer number 


428 


1AC 


6 


PLHSRRDF 




Double RBF for spanned 
record 


428 


1AC 


1 


PLHSRR2 




R byte 2 


429 


IAD 


2 


PLHSRLVL 




Level number 


431 


1AF 


1 


PLHSSR1 




R byte 1 


432 


1B0 


2 


PLHSRLL 




Length of segment 


434 


1B2 


1 


PLHSWT1 


X'80 
X'40 
X'20 
X'10 


PLH communication switch 

control 

Reserved 

Rese rved 

Reserved 

Reserved 








PLHUPRES 


X'08 


AIX upgrade reset switch 








PLHPCI 


X'04 


Previous control interval 








PLHBWD 


X'02 


0=Forward, l=backward 








PLHLRD 


X'01 


0=any record, l=last record 


435 


1B3 


1 


PLHFLG1 


X'80 
X'40 
X'20 
X'10 


Flag byte continuation 

Reserved 

Reserved 

Reserved 

Reserved 








PLHDUKEY 


X'08 


Duplicate key in AIX record 








PLHAIXRP 


X'04 
X'02 
X'02 


AIX repositioning flag 

Reserved 

Reserved 


Index PLH 


436 


1B4 


40 


PLHINDEX 
PLHLESDS 




Index PLH 

Length of PLH for ESDS 








Index CNV De 


criptio 




436 


1B4 


20 


PLHXCNV 




Index CNV information 


436 


1B4 


4 


PLHXRBA 




Index CNV RBA 


440 


1B8 


8 


PLHXBUF 




Index buffer description 


440 


1B8 


4 


PLHXBCB 




Address of index BCB 


444 


1BC 


4 


PLHXBAD 




Address of index buffer 


448 


ICO 


4 


PLHXCIDF 




Index CNV CIDF 


448 


ICO 


2 


PLHXFSO 




Index CNV free space 
offset 



PLACEHOLDER (PLH) (. . . Continued) 



Offse 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




450 


1C2 


2 


PLHXFSL 




Index CNV free space length 


452 


1C4 


1 


FLHXSW 




Index CNV switches 


453 


1C5 


1 


PLHX5W1 




Buffer request control 


454 


1C6 


2 


PLHXCSZ 




Index CNV sfze-10 


Index Entry Description 


456 


1C8 


20 


PLHXETRY 




Index entry description 


456 


1C8 


2 


PLHXEO 




Index entry offset 


458 


1CA 


2 


PLHXSEO 




Next section entry offset 


460 


ICC 


4 


PLHXSOP 




Last section entry offset 
pointer 


464 


1D0 


2 


PLHXLVL 




Present index level in 
process 


466 


1D2 


2 


PLHXLEVP 




Previous level index 


468 


1D4 




PLHXPTRP 




Previous entr/-s p-field 


468 


1D4 


2 


PLHXEOP 




Previous entry offset 


470 


1D6 


2 


PLHXSEOP 




Previous section entry 
offset 


472 


1D8 


4 


PLHXRBAP 




Previous index record RBA 


Read-Ahead Index PLH 


476 


IDC 


28 


PLHBINDX 




Read -ahead index PLH 


Read-Ahead Index CNV Description 


476 




20 


PLHBXCNV 




Read-ahead index CNV 

information 

Index CNV RBA 


476 




4 


PLHBXRBA 




480 




8 


PLHBXBUF 




Index buffer description 


480 




4 


PLHBX8CB 




Address of index BCB 


484 


1E4 


4 


PLHBXBAD 




Address of index buffer 


488 


1E8 


4 


PLHBXCDF 




Index CNV CIDF 


488 


1E8 


2 


PLHBXFSO 




Index CNV free space offset 


490 


1EA 


2 


PLHBXFSL 




Index CNV free space length 


492 


1EC 


1 


PLHBXSW 




Index CNV switches 


493 


1ED 


1 


PLHBXSW1 




Buffer request control switch 


494 


1EE 


2 


PLHBXCSZ 




Index CNV size-10 


Read-Ahead Index Entry Description 


496 


1F0 


2 


PLH3XEO 




Index entry offset 


498 


1F2 


2 


PLHBXSEO 




Next section entry offset 


500 


1F4 


4 


PLHBXSOP 




Last section entry offset 
pointer 


Previous Record Key Information 


504 


1F8 


1 


PLHPKEY 
PLHLKSDS 




Key of previous record 
Basic length of PLH for 
KSDS 



RE QUEST PARAMETER LIST (RPL) 



Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










1 


RPLID 




Control block identifier 
X'00 1 



1 




1 


1 
1 


RPL1DD 
RPLACT 


X'00' 


RPL equate 

Active byte test and set 
X'00' VSAM Release 1 
X'10" VSAM Release 2 
X'20' VTAM 


2 


2 


2 


RPLLEN 




Length of RPL 


4 


4 


4 


RPLRBA 




R3A of last record processed 


4 


4 


4 


RPLDDDD 




DD field 


8 


8 


4 


RPLARG 




Pointer fo search argument 


12 


C 


8 


RPLRCD 




Record description 


12 


C 


4 


RPLAREA 




Address of the caller's 
Length of record 


16 


10 


4 


RPLRLEN 




20 


14 


4 


RPLBUFL 




User buffer size 


24 


18 


4 


RPLACB 




Address of the caller's ACB 


24 


18 


4 


RPLDACB 




Catalog compatibility 


28 


1C 


1 


RPLSTR1D 




RPL string identifier 


29 


ID 


1 


RPLREQ 




Request type 








RPLPOINT 


X'00' 


POINT request 








RPLGET 


X'04' 


GET request 








RPLERASE 


X'08' 


ERASE request 








RPLPUT 


X'OC 


PUT request 








RPLUPDTE 


X'OC 


Update request 








RPLINSRT 


X'10' 


Insert request 








RPLCHECK 


X'14' 


Check request 








RPLRCLSE 


X'18' 


RCLOSE request 








RPLENDRQ 


XMC 


ENDREQ request 








RPLFRCIO 


X'lC 


FORCIO request 








RPLVERFY 


X'20' 


VERIFY request 








RPLPUT L 


X'24' 


PUT locate request 


30 


IE 


2 


RPLKEYL 




Key length 


32 


20 


2 


RPLOPTCD 




Option codes 


32 


20 


1 


RPLOPTi 




First byte of options 








RPLKEY 


X'80' 


Keyed access 








RPLADR 


X'40' 


Addressed access 








RPLSEQ 


X'20' 


Sequential 








RPLD1R 


XMO' 


Direct processing 








RPLASY 


X'08' 


Asynchronous 








RPLSKP 


X'04' 


Skip sequential access 








RPLCNV 


X'02' 


CNV access (RBA) 








RPLUPD 


x-or 


Update 


33 


21 




RPLOPT2 




Second byte of options 








RPLKGE 


X'80' 


Search key greater than or 
equal 








RPLGEN 


X'40' 


Generic key request 








RPLNSP 


X'20' 


Note string position 








RPLNUP 


X'10' 


No update 








RPLLOC 


X'08' 


Locate mode 








RPLUBF 


X'04' 


User buffers 








RPLBWD 


X'02' 


0=Forwards, l=backwards 








RPLLRD 


X'OT 


0=Any record, l=Last record 



REQUEST PARAMATER LIST (RPL) (. ..Continued) 



Offset 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




34 


22 


1 


RPLHLD2 


X'FF' 
X'OO' 


Second test and set byte 
(RPL not available) 
RPL available 


35 


23 


1 


RPLHLD 


X'FF' 
X'OO' 


Test and set byte (RPL he Id- 
request not completed) 
Request completed 


36 


24 


1 


RPLFLAG 


X-FF' 


Flag byte 
Reserved 


37 


25 


3 


RPLFDBK 




Error feedback area 


37 


25 


1 


RPLFDBK1 




Error class (return) code 


37 


25 


1 


RPLRTNCD 




Error class code 


38 


26 


1 


RPLFDB2 




Function type code 


39 


27 


1 


RPLFDB3 




Error type code 


39 


27 


1 


RPLERRCD 




Error type code 


39 


. 27 


1 


RPLFDBKC 




Error type code 


The following equates are for the various feed 


sack return 


> that may be set for offset 


39 (27). 


They fall into the four categories sho 






Register 


15 setting for error feedback code 












RPLNOERR 


X'OO' 


No error detected 








RPLNORPL 


X'04' 


RPL held by another request 








RPLLOGER 


X'08' 


Logical error 








RPLPHYER 


X'OC 


Physical error 








RPLVABND 


X'3C 


ABEND encountered (VTAM) 


Returns that are not errors (Register 15 = X'OO") 








RPLEOV 


X'04' 


EOV called during request 








RPLDPKEY 


X'08' 


Duplicate key 


Logical 


errors (register 15 = X'08') 












RPLEOFDS 


X'04' 


End of data set encountered 








RPLEODER 


X"04' 


End of data set encountered 








RPLDUPRC 


X'08' 


Duplicate record 








RPLDUP 


X'08' 


Duplicate record 








RPLSEQCK 


X'OC 


Sequence error 








RPLNRFND 


X'lO' 


No record found 








RPLNOREC 


X'10' 


No record found 








RPLEXCTL 


X'14' 


Data already in exclusive 
control 








RPLNVOLM 


X'18' 


Volume or extent 
unavailable 








RPLNRSPA 


X'lC 


No DASD space available 








RPLNOEXT 


X'lC 


No DASD space available 








RPLSPACE 


X'lC 


No DASD space available 








RPLINRBA 


X'20' 


Invalid RBA specified 








RPLNKEYR 


X'24' 


No key range for new record 








RPLNOVIR 


X'28' 


Insufficient virtual storage 



REQUEST PARAMETER LIST (RPL) (. . . Continued) 



Offset 


Bytes 


Field Name 


Hex 


Description 


Dec Hex 






Digit 








RPLWRKAS 


X'2C 


User's work area not large 
enough 






RPLCDLOD 


X'30' 


CD LOAD failure 






RPLVLERR 


X'34* 


Internal VSAM logic error 






RPLNOPLH 


X'40' 


PLH in use (no string 
available) 






RPLNOPEN 


X'44' 


Access type not requested 
at Open 






RPLKEYES 


X'48' 


Keyed request for ESDS 






RPLADRKS 


X'4C 


ADR or CNV insert for 
KSDS 






RPLINERS 


X'50' 


Illegal ERSAER request 






RPLINLOC 


X'54' 


Illegal locate mode 
specification 






RPLNOPOS 


X'58' 


Positioning error 






RPLNGUPD 


X'5C 


No valid GET UPD issued 






RPLUPDKC 


X'60' 


Key change during update 






RPLLENCN 


X'64' 


Length change for addressed 
update 






RPLCONOP 


X'68' 


Improper or conflicting 
RPL options 






RPLIMRCL 


X'6C 


Improper RECLEN specified 






RPUMGKL 


X'70' 


Improper generic key length 
specified 






RPLINLD 


X'74' 


Illegal request during data 
set load 






RPLCATLG 


X'80' 


Internal catalog call 
failure 






RPLSRLOC 


X'84' 


Illegal locate mode 






RPLSRADR 


X'88' 


Illegal request for spanned 
record 






RPLINCSR 


X'8C 


Inconsistent spanned record 






RPLNOBAS 


X'90' 


No base record 






RPLMAXPT 


X'94' 


Maximum of pointers 
exceeded 






RPLINVRR 


X'CO' 


Invalid relative record 
number 






RPLRRADR 


X'C4' 


Illegal address requested 
(RRDS) 






RP LI PATH 


X'C8' 


Illegal path access 






RPLINBWD 


X'CC 


Illegal backward mode 
requested 


Physical errors (register 15 = X'OC 






RPLRDERD 


X'04' 


Data read error 






RPLRDER1 


X'08" 


Index read error 






RPLRDERS 


X'OC 


Sequence set read error 






RPLWTERD 


X'10' 


Data write error 






RPLWTER1 


X'14' 


Index write error 






RPLWTERS 


X'18' 


Sequence set write error 



REQUEST PARAMATER LIST (RPL) (. . .Continued) 



Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




40 


28 


4 


RPLCHAIN 




Pointer to next RPL 


44 


2C 


1 


RPLAIXID 


X'80' 
X'40' 
X'20' 
X'10' 
X'08' 
X'04' 
X'02' 


A IX information byte 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 








RPLAXPKP 


X'Ol' 


Prime key pointer 


45 


2D 


2 


RPLAIXPC 




Number of pointers 


48 


30 


4 


RPLMLOAD 




CBM module load address 



TRACK HOLD BLOCK (THB ) 



Displacement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 







o' 


1 


THBID 


X'88' 


Control block identification 


1 


1 


1 


THBFLAG 


X'00' 


Flag byte 








THBACTV 


X'80' 


This THB is active 








TKBPSUDO 


X'40' 


Track hold not issued 








THBREAL 


X'20' 


Track hold issued 


2 


2 


2 


THBLEN 




Length of THB 


4 


4 


2 






Available 


6 


6 


2 


THBTID 




Task ID 


8 


8 


16 


THBCCB 




CCB area 


24 


18 


8 


THBCCW 




CCW area 


24 


18 


1 


THBCCWOP 




CCW operation code 


25 


19 


3 


THBCCWAD 




CCW argument address 


28 


1C 


2 






Available 


30 


IE 


2 


THBCCWCT 




CCW byte count 


32 


20 


20 


THBIODRB 




ODRB area 


32 


20 


4 






Available 


36 


24 


8 


THBARG 




MBBCCHHR 


44 


2C 


8 






Available 


52 


34 


48 


THB SAVE 




Save area for 12 registers 



FIELD CONTROL AND DATA BLOCK (FCDB) 



Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










64 


FCB 




Maps the module FCB 








56 






Space for use in the block 


56 


38 


1 


FCBTIC 




Reserved for a TIC 
operation code 


57 


39 


3 


FCBCHAIN 




Pointer to next block 


60 


3C 


1 


FCBCFL 




Reserved for chaining flag 


61 


3D 


1 


FCBALI 




Allication indicator 








FCBPRVA 


X'04' 


Previous request allocated 








FCBPRVSV 


X'08" 


Previous request save 


62 


3E 


2 


FCBOFSET 




Offset pointer in block 



BLOCK POOL HEADER (BKPHD) 



Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










2 


BKPLENG 




Length of the pool of 
blocks 


2 


2 


2 






Available 


4 


4 




BKPHDECB 




Control allocation of 


4 


4 


2 






Not used 


6 


6 


1 


BKPHDCOM 




Communications byte 








BKPHWAIT 


X'80' 


Wait flag 


7 


7 


1 


BKPHDTS 




Test and set byte 
allocation 


8 


8 


32 


BKPHRSAV 




Space for saving 
registers -steal 


8 


8 


4 


BKPHRS13 




Save register 13, swap 
PLH 


12 


C 


4 


BKPHRS14 




Save register 14 during 
steal 


16 


10 


4 






Save register 15 during 
steal BCB 


20 


14 


4 


BKPHRS00 




Save register during 
steal BCB 


24 


18 


4 


BKPHRS01 




Save register 1 


28 


1C 


4 






Save register 2 


32 


20 


4 






Save register 3 


36 


24 


4 






Save register 4 


40 


28 


4 


BKPHDBHD 




Save data buffer header- 
steal 


44 


2C 


4 


BKPHIBHD 




Save index buffer header - 
steal 


48 


30 


4 


BKPSPCHN 




Address of next area of blocks 


52 


34 


4 


BKPERCCB 




Address of CCB chain of 
errors 


56 


38 


4 


BKPFSTBK 




Address of first available 


60 


3C 


4 


BKPSTECB 




ECB-steal BCB, other string 


60 


3C 


2 






Available 


62 


3E 


1 


BKPSTCOM 




Communications byte 








BKPSWAIT 


X'80' 


Wait flag 


63 


3F 


1 


BKPSTTS 




Test and set block 



UPGRADE SET BLOCK (USB ) 



Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










1 


USB ID 




USB identifier 








USBIDD 


X'EO' 


USB equate 


1 


1 


1 


USBACT 




Active byte, test and set 


2 


2 


2 


USBLEN 




Length of this block 


4 


4 


2 


USBMAXDB 




Max .data buffer in upgrade 
set 


6 


6 


2 


USBMAXIB 




Max. index buffer in 
upgrade set 


8 


8 


4 


USBWAPTR 




Pointer to work area pool 


12 


C 


2 


USBMIN 




Min. required record length 


14 


E 


2 


USBWALEN 




Work area length 


16 


10 


4 


USBPLH 




Pointer to PLH 








Begin of first/c 


nly Index Entry 


20 


14 




USBAIX 










4 


USBACB 




Pointer to ACB 








USB LAST 


X'80' 


Last entry indicator 


24 


18 


2 


USBRKP 




Relative key position 


26 


1A 


2 


USBKL 




Key length 


Next Alternate Index Entry 


28 


1C 











OPEN ACB LIST (OAL) 



Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 





1 



1 


1 
1 


OAL1D 
OALIDD 




OAL identifier 
Reserved 


2 


2 


2 


O ALLEN 




Length of this block 
(max. 512) 


4 


4 


4 


OALNOAL 




Pointer to next OAL 


8 


8 


2 


OALNOPN 




No of open data sets cr 
partitions 


10 


A 


2 


OALNENT 




No. of OAL entries 
(max. 62) 


12 


C 


4 


OALACB 




Address of opened ACB 


16 


10 


1 


OALSVC 




Delimiter (X'OA') 


17 


11 




OALFLG 




Flag byte 








OALACT 


X'80' 
X'40' 
X'20' 
X'10 1 
X'08' 
X'04' 
X'02' 
X'01' 


ACB is open 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 


18 


12 


2 


OALCICHK 




Value to check validity 
of cylinder no. of data set 
in catalog 



SERVICE AIDS 

Service aid phases are available for : 

Enabling and disabling snap dumps within the VSAM component. 

Obtaining snap dumps of control blocks . 

Using UPSI to obtain diagnostic information for the VSAM catalog. 

Maintaining DSCBs in the VTOC end VOL1 labels on DASD. 

Loading a VSAM phase or a program you have written. 

he service aid phases IKQVDUMP and SSBCVS03 are included in the link-edit 
of VSAM. The other three phases, IKQVEDA, IKQVDU, and $$BCVS04 can be 
placed in the core image library by executing the following job. 



//JOB 


JOBNAME 


//OPTION 


CATAL 


INCLUDE 


IKQCLNLK 


/* 




//EXEC 


LNKEDT, REAL 


/& 





Enabling and Disabling Snap Dumps 



The following snap points are available in VSAM. Each snap ID, if enabled with 
IKQVEDA, will produce the result indicated. 

Snap number Result of Enabling this Snap 

0001 This snep allows Catalog Management diagnostic information to be 
obtained. (See section'Using UPSI to obtain Diagnostic Information 
for the VSAM Catalog ' for details.) 

As snap 0001 uses the UPSI byte, it cannot be run when the user 
program in the partition also uses the UPSI byte. 

0002 This snap enables the Buffer Manager trace, which provides the 
current usage of VSAM buffering. 

0003 This snap enables the CLOSE control block dump at the beginning 
of CLOSE processing. 

0004 This snap enables the VSAM I/O trace facility. 

0005 This snap enables the I/O error trace. 

0006 This snap enables the OPEN control block dump facility when open 
processing is complete. 

0007 This snap enables the OPEN error trace. Control blocks are printed 
if an error occurs during open processing. 

0008 This snap enables the Catalog Management I/O trace. All I/O 
operations done by catalog management are printed on SYSLST. 

0009 This snap enables the VSAM Record Management error handler trace, 
allowing display of control blocks for any error detected by VSAM 
record management. 



SERVICE AIDS (. . .Continued) 

Enabling and Disabling Snap Dumps (. . .Continued) 

IKQVEDA is called by: 

//EXEC IKQVEDA 
The routine will print on SYSLOG : 

ENTER FUNCTION ENABLE/DISABLE/END 
You must enter either : 

ENABLE SNAP = xxxx 



(where xxxx is one of the snap numbers) 



DISABLE SNAP = xxxx 

END (to terminate processing). 

The program will look for a private core image library and print: 

NO PRIVATE CORE IMAGE LIBRARY ASSIGNED 

if it cannot be found and will than look in the core image library for the 
VSAM phase needed. 

If the phase needed cannot be found in a library the program will inform 
you with the following message -. 

PHASE NOT FOUND IN THE SYSTEM PRIVATE 
CORE IMAGE LIBRARY 

Any error in input will result in the INVALID REPLY message and the 
ENTER FUNCTION message is reissued. 

The program can only be ended by the END reply as noted earlier. 

The following examples illustrate the use of IKQVEDA to enable and disable 
SNAP 0001 : 

// EXEC IKQVEDA 

ENTER FUNCTION ENABLE/DISABLE/END 

ENABLE SNAP =0001 

NO PRIVATE CORE IMAGE LIBRARY ASSIGNED 

SNAP 0001 ENABLED 

ENTER FUNCTION ENABLE/DISABLE/END 

DISBALE SNAP = 0001 

NO PRIVATE CORE IMAGE LIBRARY ASSIGNED 

SNAP 0001 DISABLED 

ENTER FUNCTION ENABLE/DISABLE/END 

END 



SERVICE AIDS (. . .Continued) 



Obtaining Snap Dumps of Control Blocks 

IKQVDUMP enables you to print out snap dumps of record management and catalog 
control blocks. Code is provided at certain points in VSAM modules which is 
nonoperational so far as normal execution of the modules is concerned. Refer to 
'Enabling and Disabling Snap Dumps'. 

IKQVDUMP is called by the following sequence of instructions (See also 'Loading 
a VSAM phase or a Program You Have Written') : 

LA 1, PARMLIST 

SVC 2 



DC 
DC 



CL8'$SBCVS03' B transient 

CL8'IKQVDUMP' phase that provides dump of 

control blocks 



When the program has completed processing, SSBCVS03 returns the program to th 
instruction immediately following the SVC instruction. 

Figure below shows the description and format of the parameter list that follows 
the two phase names in the above calling sequence. 



Offset 


Bytes and 


Field Name 


Description 


Dec Hex 


Bit Pattern 









1 


PARMSW1 


First byte of parameter list 




1 


PARMAMBL 


Dump the AMBL 




.1 


PARMACB 


Dump the ACB 




..] 


PARMAMDS 


Dump the AMDSB 




...1 .... 


PARMARDB 


Dump the ARDB 




I... 


PARMBCB 


Dump the BCB 




1.. 


PARMBUFE 


Dump the buffer 




1. 


PARMEDB 


Dump the EDB 




1 


PARMLPMB 


Dump the LPMB 


1 1 


1 


PARMSW2 


Second byte of parameter list 




1 


PARMCCW 


Dump the CCW 




.1 


PARMPLH 


Dump the PLH 




..] 


PARMBHD 


Dump the BHD 




...1 .... 


PARMRPL 


Dump the RPL 




1... 


PARMEXCP 


Dump the EXCPAD work area 




1.. 


PARMCAT 


Dump the catalog blocks 




1. 


PARMDATA 


Dump the non-catalog blocks 




1 


PARMTHB 


Dump the THB 


2 2 


1 


PARMSW3 


Third byte of parameter list 




1 


PARMOPEN 


Dump the open work area 




.1 


PARMCLOS 


Dump the close work area 




..1 


PARMCIW 


Dump the control interval split area 




...1 .... 


PARMVLST 


Dump the volume list 




1... 


PARMREGS 


Dump the registers 




1.. 


PARMCECL 


Dump the control interval exclusive 
control list 




1. 


PARMODLB 


Dump the open DLBL 




1 


PARMREQR 


Dump the requester's registers 



SERVICE AIDS (.. .Continued) 

Obtaining Snap Dumps of Control Blocks (.. 



Offset 


Bytes and 


Field Name 


Description 


Dec Hex 


Bit Pattern 






3 3 


1 


PARMSW4 


Fourth byte of parameter list 




1 


PARMPAMB 


l = Pointer to start dump is in parameter 

list (PARMAMBA) 

0=Pointer to start dump is in register 11 




..1 


PARMCCAA 


l=Pointer to CCA 
0=Pointer to AMBL 




...1 


PARMRTNA 


Call the test routine 




.... 1... 


PARMHDID 


Dump the header ID 




.X.. .XXX 




Available 


4 4 


4 


PARMAMBA 


Pointer to start dump 


8 8 


4 


PARMID 


Pointer to header 


8 8 


1 


PARMIDLN 


Length of the header 


9 9 


3 


PARMIDAD 


Address of the ID 


12 C 


1 


PARMSW5 


Fifth byte of parameter list 




1 


PARMCCA 


Dump the CCA 




.1 


PARMCADL 


Dump the CCA DLBL 






PARMCADP 


Dump the CCA DADSM parameter list 






PARMCARA 


Dump the CCA record areas 






PARMCPL 


Dump the catalog parameter list 
(CTGPL) 






PARMPLDN 


Dump the CTGPL data set name 




'. 1. 


PARMPLNN 


Dump the CTGPL new name 




1 


PARMPLPW 


Dump the CTGPL password 


13 D 


1 


PARMSW6 


Sixth byte of parameter list 




1 


PARMPLCN 


Dump the CTGPL catalog name 




.1 


PARMPLCI 


Dump the CTGPL control interval 
number 






PARMPLDL 


Dump the CTGPL file CTGDDNM field 






PARMPLWA 


Dump the CTGPL work area 






PARMCFL 


Dump the catalog field parameter list 
(CTGFL) 






PARMFLFD 


Dump the CTGFL fields 




1. 


PARMFLFN 


Dump the CTGFL field name 




X 




Available 


14 D 


1 


PARMSW7 


Seventh byte of the parameter list 




1 


PARMCFV 


Dump the catalog field vector table 
(CTGFV) 




.1 


PARMFVDL 


Dump the CTGFV file name 






PARMFVEN 


Dump the CTGFV entry name 






PARMFVKR 


Dump the CTGFV key range list 






PARMFVVL 


Dump the CTGFV volume serial list 






PARMDPDL 


Dump the DADSM parameter list DLBL 




1. 


PARMDPIO 


Dump the DADSM parameter list I/O 




1 


PARMDPWA 


Dump the DADSM parameter list work 
area 



SERVICE AIDS (. ..Continued) 

Obtaining Snap Dumps of Control Blocks (. . .Continued) 



Offset 


Bytes and 


Field Name 


Description 


Dec Hex 


Bit Pattern 






15 F 


1 


PARMSW8 


Eighth byte of parameter list 




1 


PARMDPSV 


Dump the DADSM parameter list save 
I/O area 




.1 


PARMCBS 


Dump the AMCBS 




..1 


PARMCAXW 


Dump the CAXWA 




...1 .... 


PARMCXRL 


Dump the CAXWA RPL 




.... 1... 


PARMCXDR 


Dump the CAXWA DSCB read-in 
work area (DRWA) 




1.. 


PARMCMSW 


Dump the CMS work area 




XX 




Available 


16 10 


8 


PARMRTNN 


Name of test routine 



Using the Test Routine Dump 

IKQVDUMP allows a phase to be called before a dump is taken to see if a dump is 
desired. (The name of the test routine is in the parameter list at field name PARMRTNN.) 
The phase can use any logic to determine whether a dump is needed, and this logic will 
override a call for a dump if it is not needed. If a is returned in register 15, the dump 
will be taken ; if register 15 holds a nonzero return, the dump will not be taken. 

The registers on entry to the test routine have the following contents : 

R2 = Pointer to the parameter list 

Rll = Caller's register 11 

R13 = Pointer to 18-word save area 

R14 = Return address of calling phase 

R15 = Address of entry point 



Using UPSI to Obtain Diagnostic Information for the VSAM Catalog 



Manipulation of the UPSI job control statement enables you to screen catalog return codes 
and obtain a snap dump, cancel a job (which causes a full dump to be taken), or simply 
continue processing. You must first use IKQVEDA to enable Snap =0001. Otherwise the 
UPSI statement will be inoperative. As snap 0001 uses the UPSI byte, it cannot be run when 
the user program in the partition also uses the UPSI byte. 

The purpose of this service aid is to diagnose catalog errors that occur while running any 
program that causes the VSAM catalog to execute. Typically this would be an Access 
Method Services module or a record management program you have written. 

The //UPS I nnnnnnnn job control statement must precede the //EXEC [ progname ~] 
statement. If no UPSI statement is included, the default is //UPSI 000 (see type 3 request 
below). 



SERVICE AIDS (...Continued) 

Using UPSI to Obtain Diagnostic Information for the VSAM Catalog (...Continued) 



On exit from cptalog management after processing, a message will be printed out 
depending on the type of UPSI bit setting you have selected. Some messages requir 
a reply from the operator. The return codes in the message are obtained from 
register 15. The format is : 

** NNN, MN, RRR, FFFF, CCCCCCCCCCCCCCCC 



NNN is the return code in decimal 

MN are the last two characters of the module name which issued the 





error. 


This 


i is blank in case of error code 0. 


RRR 


is the 




on code in decimal 


FFFF 


is one 


of the following catalog management functic 




been processed : 




DEFC 




(define catalog) 




DEFA 




(define non-VSAM data set) 




DEFS 




(define space) 




DEF 




(define VSAM data set) 




ALT 




(alter) 




DELC 




(delete catalog) 




DELS 




(delete space) 




DEL 




(delete VSAM or non-VSAM data set) 




LSTC 




(list catalog) 




UPD 




(update or update-extend) 




LOC 




(locate) 



C..C is either the control interval number in decimal or the first 16 
characters of the date set name or volume serial number in 
EBCDIC. 

If a reply is required from the system operator for certain types of requests, the operator 
must enter one of the following replies from the system console : 

o Type in SNAP to get a snap dump by means of IKQVDUMP (see 

IKQVEDA for enabling snap dumps). The message will then be 
repeated and the operator should press the END key to continue 
processing 

• Type in CANCEL to cancel the [ob and obtain a full dump. 

e Press the END key to resume processing. 

The following paragraphs describe the four types of UPSI settings you can use to elicit 
a message and/or to determine the degree of return code screening done : 

Type 1 UPSI Setting . If you want to obtain an operator message for all VSAM catalog 
return codes (including 0), you must include one of the following 
statements : 

// UPSI 1 1000000 No reply is required from the operator 

// UPSI 01100000 A reply is required from the operator 



SERVICE AIDS ( Continued) 

Using UP5I to Obtain Diagnostic Information for the VSAM Catalog (. . .Continued) 

Type 2 UPS I Setting. An operator message is issued only if the return code is not 
for the following statements : 

// UPSI 10000000 No reply is required from the operator 

// UPSI 01000000 A reply is required from the operator 

Type 3 UPSI Setting. An operator message is not issued if one of the following 
conditions exists: 

1 . the Access Method Services command being processed 
was a LISTCAT and the return code is 8, or 

2. the return code is 0, 40, 68 or 160 

(these code occur during normal processing and are, 
therefore, excluded). 
If neither of these conditions exists, an operator message is 
issued for the following statements: 

// UPS! 00000000 No reply is required from the operator 

// UPSi 01 1 10000 No reply is required from the operator 

Type 4 UPSI Setting If you want an operator message on a specific return code, 
you must include the following statements : 
// UPSI OOnnnnnn nnnnnn is set to the value, in binary, 

of the code divided by 4. A reply 
is required from the operator. 

Maintaining DSCB's in the VTQC and VOL! Labels on DASD 

A VSAM DADSM service aid has been provided to assist the programmer and operator 
in maintaining the VTOC and VOL1 labels on DASD devices. 

The following procedures should be followed to use IKQVDU at the system console for 
such maintenance. The key difference in the three procedures is the presence, or 
absence, of a// UPSI Job control statement. As IKQVDU uses the UPSI byte, it cannot 
be run v/hen the user program in the partition uses the UPSi byte. Steps cf the procedure 
in lower case letters are typed in at the console ; steps in upper case letters are printed 
out. 

Procedure 1 Explanation 



//cssgn sys000,x'cuu' cuu points at the volume you want to use. 

(press END key) 

//upsi 1 This job control statement is optional. If it is included, 

(press END key) the following events take place on the volume that was 

assigned to SY5000 : 

• The VSAM volume ownership bit and CRA TT 
pointer in the F4 DSCB are reset. 

• The entire VTOC is scratched, that is, empty 
DSCBs are written over existing F 1, F2, and F3 
DSCBs, with the exception of DSCBs that have 
names starting with the characters 'DOS', or 
'PAGE 1 . 



SERVICE AIDS (...Continued) 

Maintaining DSCB's in the VTOC and VOLT Labels on DASD (. . .Continued) 



Procedure 1 (c'td) 

//upsi 1 

(press END key) 

continued 

// exec ikqvdu, size=auto 
(press END key) 



// assgn sysOOO, x 
(press END key) 



//upsi 11 
(press END key) 



// exec ikqvdu, size-auto 
(press END key) 



Explanation 

• An operator authorization prompt is issued 

if the DSCB to be scratched is security 
protected 

Start Execution of the IKQVDU phase 



Explanation 

cuu points at the volume you want to use 

This job control statement is optional. If it is 
included, the following events take place on the 
volume that was assigned to SYSOOO : 

• The VSAM volume ownership bit and CRA TT 
pointer in the F4 DSCB are reset. 

• The entire VTOC is scratched, that is, FO 
DSCBs are written over existing Fl, F2, and 
F3 DSCBs, with the exception of DSCBs that 
have names starting with - the characters 
'DOS' or 'PAGE'. 

Start execution of the IKQVDU phase. 



// assgn sysOOO, x'ci 
(press END key) 



//exec ikqvdu, siza=30k 
(press END key) 



Specify function or reply 
'?' for options ready 



Explanation 

cuu points at the volume you want to use 

Siart execution of the IKQVDU phase. 



The character ? causes a list af the various functio 
that IKQVDU performs to be printed out at the 
system console. 



SERVICE AIDS ( . . . Continued) 



Maintaining DSCB's in the VTOC and VOL1 Labels on DASD (. . .Continued) 



To set the Volume Ownership Flag 

To set the CRA Pointer 

To reset the Volume Ownership Flag and 

CRA Pointer 

To set the Security Flag in A F 1 DSCB 

To reset the Security F lag in A F 1 DSCB 

To remove a DSCB from the VTOC 

To rename a DSCB 

To allocate a DSCB 

To reinitiate Processing 

To alter or display a DASD VOL1 label 

To terminate Processing 
Ready 



You can avoid printing out this list of functions simply by specifying the function 
you wish as follows : 

Procedure Explanation 



reply 'Set Ownership' 
reply 'Set Ownership' 

reply 'Reset Ownership' or 'Reset CRA' 

reply 'Set Security' 

reply 'Reset Security' 

reply 'Scratch' 

reply 'Rename' 

reply 'Allocate' 

reply 'Restart' 

reply 'CLIP LABEL=SER=N. .N' or 

'CLIP LABEL=DISPLAY' 
reply 'End' 



Set Ownership 
(press END Key) 



Causes the VSAM ownership bit to be 
set in the F4 DSCB and optionally 
allows the user to set the CRA TT pointer. 



Reset CRA or Reset Ownership 



Causes the VSAM ownership bit and 
CRA TT pointer to be reset in the F4 
DSCB 



Set Security 
(press END key) 



Causes the security bit to be set in the 
Fl DSCB 

When the console responds with ENTER 
DSN, reply with the data set name of 
the DSCB to be modified. 



Reset Security 
(press END key) 



Causes the security bit in the Fl DSCB 
to be reset. 

When the console responds with ENTER 
DSN, reply with the data set name of the 
DSCB to be modified. 



Scratch DSN=DSNAME 
(press END key) 



Scratch VTOC 
(press END key) 



Causes the DSCB with the specified 
data set name to be scratched. 

Causes the entire VTOC to be scratched 
with the exception of data set names 
starting with the characters "DOS' and 
'PAGE'. In addition, an operator- 
authorization prompt will be issued if the 
DSCB is security-protected or describes 
a catalog. 



SERVICE AIDS (...Continued) 

Maintaining DSCB's in the VTOC and VOL1 Labels on DASD (. . . Continued) 



Procedure 



Rename 

(press END key) 



Allocate 

(press END key) 



Restart 

(press END key) 



CLIP LABEL=DISPLAY 
(press END key) 



CLIP LABEL=SER=N..N 
(press END key) 



End 

(Press END key) 



Explanation 

Causes the DSNAME portion of the Fl 

DSCB to be changed 

When the console responds with ENTER 

OLD DSN, reply with the data set name 

of the DSCB to be changed. 

When the console responds with ENTER 

NEW DSN, reply with the new data 

set name. 

Causes a new DSCB to be created and 

written in the VTOC. In order to 

utilize this function, a DLBL/EXTENT 

Job control statement must be provided 

(see 'DOS/VS System Control Statements 

GC33-5376'). 

When the console responds with ENTER 

FILEID, reply with the same file 

identification as that in the DLBL/EXTENT 

statement referred to above. 

When the console responds with ENTER 

NEW DSN, reply with the data set name 

of the data set to be created. 

When the console responds with DO YOU 

WISH TO SECURITY PROTECT THIS DATA 

SET? reply YES or NO. A reply of YES 

causes the data security bit to be set in 

Fl DSCB. A reply of NO causes the data 

security bit to be reset in the Fl DSCB. 

Causes processing to be reinitiated with 
a READY prompt. This keyword can be 
used as a response to any operator prompt. 

Causes the volume serial number to be 
displayed on the system console. 

Causes the existing volume serial number 
to be changed to the one specified as 
N..N. 

Causes processing to terminate. 



SERVICE AIDS (...Continued) 

Maintaining DSCB's in the VTOC and VOLT Labels on DASD (. . .Continued) 

If an error occurs during execution of IKQVDU, 

**ERROR** DADSM RETURN CODE IS nnn 

prints out on the system console. The following list shows the message code 
(nnn) and associated message that appears, for example, 

**ERROR** DADSM RETURN CODE IS 020 VTOC FULL 



nnn Message 

004 I/O error while reading volume label 

008 Volume not mounted 

012 I/O error on VTOC 

016 Duplicate name on volume 

020 VTOC full 

024 Extent overlaps expired file 

028 Extent overlaps unexpired file 

032 Extent overlaps protected unexpired file 

036 Extent overlaps VTOC 

040 Required extents missing 

044 DSCB not found 

056 Extent overlaps protected expired file 

064 GETVIS failure encountered 

072 CD LOAD failure encountered 

080 Overlap among new extents 



Loading a VSAM Phase or a program You Have Written 

If you want to load and transfer control to and from a selected VSAM phase or a 
program you have written, you can use B-transient $$BCVS03 without destroying 
any registers in the following calling sequence : 

LA 1,PARMLIST 
SVC 2 



PARMLIST DC CL8'$$BCVS03' B Transient 

RTNNAME DC CL8'XXXXXXXX" Name of phase or program you have 

written 
USERLIST DC Parameterlist for 'XXXXXXXX' 

When control is received by 'XXXXXXXX', the registers have the following 
contents : 

R0 = Address of a work area (the size of the work area is specifie 

by a halfword at offset 4 of 'XXXXXXXX' phase 
Rl = Pointer to user's parameter list (USERLIST) 
R2-13= Remain the same as they were when SVC 2 was issued 
R14 = Return address of calling module 
R15 = Address of entry point in 'XXXXXXXX' 

Control is returned from 'XXXXXXXX' by a BR 14 instruction. 
111-84 



CHAPTER IV 

MODEL 20 EMULATOR 



M 20 EMULATOR 
Flow of initializatic 



DOS SUPERVISOR 



Performs Initialization for : 
Communication Region 
. Buffers 
. CCB's 

- Issues STXITS for : 

Operator Communication 
. Abnormal EOJ 
. Program Check 

- Loads 'EMUNAME H' 



Selects Communication Functions 
(Control card analysis) 



Reads and processes 
Emulator Control Statements 
Updates CRI and EDB's 



Checks validity of assigned 
devices 



Selects Communication Functio 
(Loading of EMUNAME U) 



Loads 'EMUNAME U' 



Prepares for ussuing DIL 20 



Beginning of Emulation 

Loading of M20 emulated storage 



M 20 EMULATOR (...Continued) 
Emulator Layout 



CCW and buffer for reed ahead option o 
2501 (160 bytes) 



Error recovery buffer o 
2540 (81 bytes) 



CCW and buffer for printer 
(132 bytes) 



Card reader buffer 
(160 bytes) 



Emulated Model 20 storage (1) 
(from 4K to 32K, minus 144 bytes) 



CCBs and buffers for communications 
routines 



Communication region (3) 



CCBs and buffers for communications 
routines 



cation region data areas 



Emulator routines 



IISCP, IISCPS, IISD3, IISDD, IISDF, 
IISDFED, IISDI, IISDK, USED, IISHC, 
IISTD, IISTP.. IISTR. 

Optional 



emunameU (4) emunameH (4) 

I IS CM MSHF 

IISCMS 

IISDI 

IISD2 

IISD3 

IISD4 

IISDE 

I IS ID 

IISMD2 

IISMF 

HSPD2 

I IS IN (lastrouiine) 



M 20 EMULATOR ( Continued) 



Emulator Layout (..Continued) 



Device independence buffers (optional) 




Tape read ahead buffers (optional) 




1 MSEI is Icoded here and overlays 




itself at end of initialization 




2 EDBs are also loaded in the disk area 




of the communication region when disk 




and device independence are not 




included in fhe emulator 




3 The communications region is loaded 




and moved up to a 256-byte boundary 




by IISEI at initialization 




4 The phases emunameU and emunameH 




overlay one another 





COMMUNICATION REGION CRT 



Dec Hex 




C 
10 



24 


18 


28 


1C 


32 


20 


36 


24 


40 


28 



56 


38 


60 


3C 


64 


40 


68 


44 


84 


54 


88 


58 


92 


5C 


116 


74 


148 


94 


152 


98 


156 


9C 



CRBYTE12 

1st 2 bytes M20 inst 



CR6000 

base reg ss inst 



CR5000 

base reg ss inst 



CRDIL 

EA 20 3000 3100 DIL instruction 



CRM20PSW 
current M20 PSW 



CRMAPORG 

A (M20 address 0) relocation factor 



CRSIZE20 
M20 core size - 



CRPEADD 
A(IISCPPE) 



CRDCNTRT 
A(IISNEIR) 



CRM201NT 
A(IISINTIR) 



CRDILCNT 
current value 



CRIRCAL CRPECC20 

current inst when error occurs M20 error code 



CRINTFLG 
pending interrupts 



CRDFADD 
A(IISDFED) 



CRDKBFWK CRDKBFAC CRDKOLDB 



.CRSAVM20 

M20 register save area 



CRMAPEND 

A (last byte of emulated storage) 



CRLASTFW 

A (last full word of emulated storage) CRMAPEND-3 



CRLSTCCW 

A (last possible M20 CCW) CRMAPEND-5 



• For further explanation : see end of the table 
IV -04 



COMMUNICATION REGION CRT (...Cont 

Dec Hex 
160 A0 



220 


DC 


224 


E0 


228 


E4 


232 


E8 


236 


EC 


240 


F0 


244 


F4 


248 


F8 


252 


FC 


256 


100 


508 
512 


1FC 
200 


564 


234 


568 


238 



640 280 
648 288 
656 290 



1 1 1 


CRDEVTAB 
T A (EDB of device to be emulated) : ;. 

• 


CRINTCOD 

M20 interrupt code table 


CREDBDIS 

displacement into CRDEVTAB 


CRDELADD 

A (IISTDDI) delay routine 


CRIOACT 


CREMUFLG JCREMUIND 


CRSUBMOD 

M20 model 

• 


CRSKIPSW 


CRLSTCNT 

last CRD ILCNT before DIL 


CRHFPSW 
previous M20 PSW 


CRCMADD 
A CUSCM) 


CRSIOTPE 
A(IISTP) 


CRSIODSK 
A(IISDK) 


not used 


CRDISPTB 

used by DIL : 1 byte entry for each M20 inst byte configuration. 

Index to CROPCODE table L 


__CROPCODE 

-j- A(specific emulation routine) 13 full words -r- 


CREDFADD 
A(IISEDF) 


CRSAVCPU 
_.save area for STXIT macro (program check while executing M20_ _ 
-j-instruction) ~r 


CRHFCWPK 

CCW for comm PK routines 


CRCCWRD 

CCW for read card 


CRCCWPN 

CCW for punch card 



• For further explanation : see end of the table 
IV -05 



COMMUNICATION REGION CRI (..Continued) 



Dec 


Hex 


664 


298 


672 


2A0 


676 


2A4 


680 


2A8 


684 


2AC 


688 


2B0 


692 


2B4 


696 


2B8 


700 


2BC 


704 


2C0 


708 


2C4 


712 


2C8 


716 


2CC 


720 


2D0 


724 


2D4 


728 


2D8 


732 


2DC 


736 


2E0 


740 


2E4 


744 


2E8 


760 


2F8 


764 


2FC 



CRCCWPR 
CCW for print 



CRCCWWCP 

A(chain for M20 MFCM v, 



e card) in CR2 



CRCCWPKP 

A(chain for M20 PK ops) located in CR2 



CRCCWTP 

A(chain for M20 tape ops) located in CR2 



CRDIADD 
A(IISDB) 



CRHFMSGN 
msg number 



CRHFINDP 
A(IISFFIN) 



CRHFCMDP 
A(IISFFCMR) 



e. char A-B to hex A-E 



CRHFFCAD 
A("FUNCTION"table) 



CRHFASAD 
A(STOP address) 



CRHFSCRN 

screening mask for the latest msg issued 



CRHFPBFA 
A(print buffer for c 



CRHFRBFA 
A(read buffer for c 



CRHFCCRA 
A(IISHCCF) c 



CRHFRETA 

A(IISHCEIR) communicatio 



CRHFIKAD 

A(IISHCIR) S/370 interrupt key routine 



CRHFTRAD 
A(IISHF) 



CRHFCCBA 

A(DOS CCB's for communication routines) 



CRHFXC 

translation table hexa A-F to char A-F 



CRHFRTCD 

comm routines return code from B transient 



CRHFOVLH 

communication routine phase n 



• For further explanation : see end of the table 



COMMUNICATION REGION CR1 (...Continued) 



772 


304 


780 


30C 


784 


310 


788 


314 


792 


318 


796 


31C 


800 


320 


804 


324 


808 


328 


812 


32C 


816 


330 


820 


334 


824 


338 


828 


33C 


832 


340 


876 


36C 


880 


370 


884 


374 


888 


378 


892 


37C 


896 


380 


900 


384 



CRHFOVLU 






CRHFERTP 

error type for IISHFMSG 



CRDTFDIorCRSTPH 



CRD IF STB 

A(first buffer for device independence) 



CRDIBUFL 

device independence buffer size 



CRDIBUFN 

A(second buffer for device independence) 



CRDIHBUF 

last byte of device independence buffers 



CRDIEDB 

A(EDB for device independence) 



CRD1CCT 

A(M20 carriage control tape) 



CRDIRD 

A(M20 read routine) 



CRDIPN 

A(M20 punch routine) 



CRDIPT 

A(M20 printer routine) 



CRDIER 
A(M20 er 



XIO displacement byte table 



CRD 1 CM 

A(IISDI) I/O decode 



CRDICMEN 
A(IISIDIEN) I/O decode 



CRDIMTSD 

A(IISTD) DOS tape/disk module 



CRDIEDBC 

A(EDB control card reader) 



CRD I LOAD 
A(M20 IPL) 



CRLNKSAV 

return to caller after I1SINEIR 



o For further explanation : see end of the table 
IV -07 



COMMUNICATION REGION CR1 (...Cont'd) 

Dec Hex 
904 388 



1040 410 

1048 418 

1052 41C 

1056 420 

1060 424 

1084 43C 

1088 440 

1092 444 

1096 448 

1 100 44C 



1310 51E 

1318 526 

1326 52E 

1334 536 





1 1 1 




CRSAVERR 

STXIT OC save area 




EDB active list (16 words) 
CREDBACT 

1/ O op in overlap or time sharing mode 




CRBINDEL 

last card delimiter read binary 




CRHFTRAC 

A(IISTR) trace routine 




CR20CCW1 

A(first M20 CCW used by IISTP) 




CRCARDEL 

last card character in DC of M20 CPU macro or EC control statement 




CRCHKCNT 

Record and file count for checkpoint 




CRDATADD 

A(M20 tape CCW data address) used by IISTP 




CRSAVCCB 

A(CCW in CCB) used by IISTP 




CRSAVER 

area for count/ file update used by IISTP 




CRCCWCNT 

M20 CCW record count used by IISTP 




Table of indexes into CRXIOTAB 
: CRXIODIS 
1 entry for each DAFS 




Table of indexis into CRCIOTAB 

.crtiodis : 

1 entry for each DAFS 




Table of indexes into CRTIOTAB 
: CRCIODIS 
1 entry for each DAFS 




CRERR4 

A(CPU error code 4 routine) 




CRERR5 

A(CPU error code 5 routine) 




CRERR6 

A(CPU error code 6 routine) 




CRERR7 

A(CPU error code 7 routine) 




• For further explanation : see end of the table. 



COMMUNICATION REGION CRT (...Cont'd) 



Dec Hex 
1338 53A 



1380 564 

1384 568 

1388 56C 

1392 570 

1396 574 

1400 578 

1404 57C 

1408 580 

1412 584 

1416 588 

1420 58C 

1422 590 

1428 594 

1432 598 

1436 59C 

1440 5A0 

1444 5A4 

1448 5A8 

1452 5AC 



1 1 1 


CRERROR 

A(routine handling all M20 program error stops) 


CREMUBGN 

A(first emulator byte) 


CREMUEND 

A(last emulator byte) 


CRDIIADD 

reserved for hardware 


CRDKSTAS 

1st sector in command 


static 

CRDKLERF 

last error free sector 


CRDKOBJS 

EXCP target sector 


CRDKEOC 

end of cylinder sector 


dynamic 

CRDKLDEF 

last error free sector 


CRDKECD 

end of command sector 


CRDKRSCT 
residual count 


CRDKLTCT 

last count used (head/record) 


CRDKLSTO JCRDKFAST 
disk unit last op 
1 


CRDKEFDT 

no error free data sectors 


no bytes in sector in error 
CRDKLBDT 


CRDKCCHR 

field used by ID 


CRDKCCHR 

. . . .conversion routine 


not used 


CRDKIDPC/CRDKHTSR 
A(S/370 identifier) for partial 


case - Conversion routine - 

e 


CRDKNSSK 
S/370 seek field 




CRDKCCHE 
cyl. number 


CRDKHHHE 
head number 


CRDKHRE 
record nbr 


CRDKINDI 

• 


CRDKM20 




CRDKEXCT 

• 


CRDKEXC1 

• 


CRDKEXC2 


CRDKDFDB 


CRDKDDDB 

• 


CRDKDSCT 

• 


not used 

e 


CRDKCDTB 

A(chain descriptor table) 


CRDKSKTB 
A(skelefon table) 


CRDKMOTB 
A(modifier table) 



• For further explanation : < 
IV -09 



:nd of the table 



COMMUNICATION REGION CR1 (...Cont'd) 





Hex 

5B0 

5B4 
5B8 
5BC 
5C0 
5C4 
5C8 
5CC 
5D0 
5D4 
5D8 

5DC 
5E0 
5E4 
5E8 








Dec 


II 1 


1456 


CRDKCCWA 
A(S/370 CCW area) 


1460 


CRDKKYAD 

A(S/370 key buffer for extra read) 


1464 


CRDKDAAS 

A data buffer for scan) 


1468 


CRDKIDTB 

A(S/370 identifiers table) except for scan 


1472 


CRD K IDAS 

A(S/370 identifiers table) for scan 


1476 


CRDKDK 
A(IISDK) 


1480 


CRDKDF 
A(IISDF) 


1484 


CRDKDD 
A(IISDD) DOS 


1488 


CRDKCTLH 

M20 cnt field length 


CRDKSCLH 

data sector length 


1492 


CRDKBASE 

save area for base register 


1496 


CRDKTOTS no of sectors 
given by DOS extents 


CRTRSKPS 


CRPERF 


1500 


CRXIOTAB (variable length) 
A(DII instruction) 


1504 


CRPKADD A(IISDE) 

if PK is emulated, otherwaise CRDIL 


1508 


CRTDADD A(IISTDXIO) 

if Tape/disk is emulated, otherwise CRDIL 


1512 


A(routines used to emulate M20 XIO ops) 
"3 bytes entry by emulated device 




CRCIOTAB 

A(routines to emulate M20 CIO ops) 




CRTIOTAB 

A(routines to emulate M20 TIO ops) 



• For further explanation : see next pages 



COMMUNICATION REGION FLAG BYTES LAYOUT 



Displacement 


Field name 


Bytes 


Field description 


Dec Hex 


38 26 


CRINTF LAG 




Flags for pending M20 interruptions 




Byte 1 


1 


2501 card read 




CRURINT 


.1 

.... ..\. 

1 


2520/2560 card read 
1403/2203 print 
2560 card punch 
1442 card punch 
2560 card print 
2520 card punch 
not used 




Byte 2 


1 


tape 




CRTDPK 


.1 

.... ..1. 

1 


disk 

2152 read 

2152 write or carrier return 

2152 inquiry request 

CC2 interrupt request 

not used 

not used 


160 AO 


CRDEVTAB 




Addresses of EDB's of M20 devices that 
can be emulated, as follows : 




CR2501AD 


1- 4 


2501 card reader 




CR1442AD 


5- 7 


1442 card punch 




CRPRINAD 


8-12 


1403 or 2203 printer 




CR2520AD 


13-16 


2520 card recd-punch or card punch 




CR2560BD 


17-20 


2560 MFCM 




CR2152AD 


21-24 


2152 printer-keyboard 




CRIOCAD 


25-28 


l/O channel 




CRSCAD 


29-32 


Storage control 


228 E4 


CRIOACT 








Byte 1 


1 

.1 


2501 card read 

2520/2560 card read I' fi Q 
1403/2203 print q S O 
2560 punch t Q n 
1442 punch § - y 














2560 card print f. =• Q 






1. 


2520 punch t> -T S 






1 


not used 0.0"™ 




Byte 2 


1 

.1 

.... !.i. 
i 


5' Q q" 

tape <? *•< 
disk | t 
2152 read 3*8 
2152 write or carrier return Q 
2152 inquiry request £ 
CC2 interrupt request ^ 
not used [> 
not used O 



COMMUNICATION REGION FLAG BYTES LAYOUT (...Cont'd) 



Displacement 


Field name 


Bytes 


Field description 


Dec Hex 


230 E6 


CREMUFLG 




Emulator program indicators 




CRCCFLAG 


1 


M20 PSW condition code can be modi- 
fied by current M20 instruction 




CRERRFLG 


J 


Error was detected while decoding 
current M20 instruction 




CREBDIN 


..1 


An EDB is to be inserted in CREDBACT 
by IISINEIR 




CRDCNTIN 


...1 .... 


A new DILCNT must be stored at 
CRDILCNT 




CRWAITIO 


.... 1... 


IISINEIR must complete all outstanding 
I/O operations 




CRHFOUT 


1.. 


IISINEIR must return to comm. routines 




CRETURN 


1. 


IISINEIR must return to caller 




CREIRBIT 


1 


IISINEIR has been called by an 
emulator routine 


231 E7 


CREMUIND 




Emulator program indicators 




CRDELAYf 


1 


IISINEIR must call IISTDDL to perform 
tape operation 




CRDELAYD 


.1 


IISINEIR must call IISTDDL to perform 
disk operations 




CROVLUR 


..1 


Unit record I/O operation must be 
treated in overlap mode 




CROVLTP 


...1 .... 


Tape I/O operation must be treated 
in overlap mode 




CROVLDK 


.... 1... 


Disk I/O operation must be treated in 
overlap mode 




CRDELAYF 


].. 


Delay ON must be performed by IISTDDL 




CRDELAYC 


1. 


Both a tape and a disk operation have 
been delayed 




CRM20TSS 


I 


M20 time sharing switch is being 
emulated. 


232 E8 


CRSUBMOD 


xxxxxxxx 


Hexadecimal F5 if M20 Submodel 5 or 6 
is being emulated 


233 E9 


CRSKIPSW 


xxxxxxxx 


Skip indicator for trace 


688 2B0 


CRHFLAG1 




Calls for processing : 




CRHFAS 


1 


M20 address stop 




CRHFHPR 


.1 


M20 HPR 




CRHFPE 


..1 


M20 program error 




CRHFEM 


...1 .... 


Emulator message 




CRHFSS 


.... ]... 


M20 instruction step 




CRHFTR 


].. 


Trace to be made of all M20 
instructions executed 




CRHFIK 


1. 


Interrupt key 



COMMUNICATION REGION FLAG BYTES LAYOUT (...Cont'd) 



Displacement 


Field name 


Bytes 


Field description 


Dec 


Hex 


689 


2B1 


CRHFLAG2 

CRHFASP 

CRHFSYNP 

CRHFEMP 

CRHFSSP 

CRHFIKP 


1 

.1 

..1 

...1 .... 
.... 1... 


Calls being processed : 

M20 address stop 

M20 HPR or program error 

Emulator message 

M20 instruction step 

interrupt key 


690 


2B2 


CRHFLAG3 

CRHFICC 

CRFFDCC 

CRHFINIT 

CRHFCMP 

CRHFCHN 

CRHFTC 

CRHFTRCE 

CRHECIM 

CRHFICER 


1 

.1 

..1 

...1 .... 
.... 1... 

1.. 

1. 

1 

1 


Indicates : 

Initialization control card 

Dynamic control card 

IISHFIN called 

IISHFCMR called 

Control statement chaining 

Count option for debugging 

Trace option for debugging 

M20 decimal operation 

Error in initialization control card 


691 


2B3 


CRHFLAG4 

CRHFEMT 
CRHFERSW 


1 

.1 


Indicates : 

IISHF has been loaded 

Error has been detected in a control 

atatement keyword or operands 






CRHFDF 


..11 .... 


Mask for emulator on M20 trace 






CRHFDFTT 


..1 


Emulator contains routines for trace 






CRHFDF IO 


...1 .... 


Emulator contains routines to execute 
keyword IOT of control statement DF 






CRHFTASW 


.... 1... 


M20 trace or address stop 






CRHFSTSW 


1.. 


M20 instruction step 






CRHFLC 


1. 


2501 last card has been read 






CRHFIKAC 


1 


M20 INTERRUPT key has been pressed 
during execution of IISINEIR 


694 


2B6 


CRHFCMDP 


xxxx xxxx 


Displacement in HFUNTAB of IISHFIN 


695 


2B7 


CRHFBRTB 


xxxx xxxx 


B-transient area 


696 


2B8 


CRHFTYMG 


.1 


Type of message : 
Information 


CRHFINF 






CRHFDEC 


..1 


Decision 






CRHFACT 


...1 .... 


Action 






CRHFAEOJ 


.... 1... 


Automatic End Of Job 






CRHFERMS 


1. 


Error 






CRHFCONT 


1 


Continuation 


703 


2BF 


CRHFDISP 




Displacement of entry point of a control 
statement routine in HFUNTAB 


708 


2C4 


CRHFASAD 


xxxx xxxx 


In address stop mode, address of M20 byte 
at which emulator is to stop 


710 


2C6 


CRHFMSGH 


xxxx xxxx 


Number of the latest decision or action 
message issued 



COMMUNICATION REGION FLAG BYTES LAYOUT (... .Cont'd) 



Displacement 


Field name 


Bytes 


Field description 


Dec Hex 


711 2C7 

782 30E 


CRCHKDSK 


xxxxxx. 


kx Indicates whether checkpoint file is open 
Device independence switches 


CRINDIMP 




CRD1SCFL 


X'80 


Screening flag for D. 1. initialization 




CRD 1 GEN 


X'40 


Device independence option generated 




CRD 1 GENT 


X'20 


Device independence option for tapes 




CRD 1 GEN D 


X'10 


Device independence option for disks 




CRD 1 ACT 


X'08 


Device independence option active 




CRDIMESG 


X'04 


Device indep.inf .message switch 




CRDICCTM 


X'02 


Device indep. two messages switch 




CRDINTMG 


X'01 


Device indep. initialization message 


784 310 


CRDTFDI 




A(DTFDI for device independence 
routines) 




CRSTPH 




A(IISTPH if read ahead on tape - No 
device independence) 


808 328 


CRDIERR 


XXXXXX) 


<x Error return code 


809 329 


CRD 1 CD 




Buffer Allocation/Release flag 




CRDIALLC 


X'80 


Allocation request 




CRD IRE LS 


X'40 


Release request 




CRDIRCLC 


X'20 


Dl off command 




CRDIRDIN 


X'10 


RCC/INIT command 




CRDILD 


X'08 


LD command 




CRDIEOJ 


X'04 


EOJ command 




CRDIRET 


X'02 


Return to caller via link reg. 


810 32A 


CRD IF LAG 




DI working switches 




CRDIFST 


X'80 


1st time switch for printer 




CRDICHAN 


X'40 


No hole found in carriage control tape 




CRDIFSW 


X'20 


Buffer allocation message switch 




CRDIRDM 


X'10 


Read control cards in Dl mode 




CRDIRPK 


X'08 


Read from PK at initialization 




CRDIOPN 


X'04 


OPEN issued for DTFDI 


1409 581 


CRDKFAST 




Indicator for performance 




CRDKVRIF 


X'80 


Verify option ON 




CRDKHTRY 


X'40 


Hit occurred on last command 




CRDKSCAN 


X'20 


Scan 6 SCTRS option ON 




CRDKRDBF 


X'10 


Use buffer for read option ON 




CRDKMVDD 


X'08 


Read and move SCTRS to M20 


1420 58C 
1435 59B 


CRDKHTSR 


X'80 


Hit sector addr in scan buffer 
M20 indicators for disk 
End of cylinder 


CRDKINDI 


CRDKEEOC 




CRDKEDTA 


X'40 


Data address error 




CRDKECTA 


X'20 


Count address error 




CRDKEDDC 


X'10 


Data check in data area 




CRDKEKDC 


X'08 


Data check in count area 




CRDKSHIT 


X'04 


Scan hit 




CRDKSNEQ 


X'02 


LE or HE scan hit 


1436 59C 


CRDKM20 




M20 control byte. Class of operation 




CRDKCTRL 


X'80 


Control operation 




CRDKC10 


X'40 


10 sector max operation 




CRDKC100 


X'20 


100 sectors max operation 




CRDKSCCL 


X'10 


Scan class 




CRDKCTDT 


X'08 


Count and data class 




CRDKDTCL 


X'04 


Data class 



COMMUNICATION REGION FLAG BYTES LAYOUT (....Cont'd) 



Displacement 


Field name 


Bytes 


Field description 


Dec 


Hex 


1437 


59£> 


CRDKEXCT 


x-or 


Control byte for building CCW's 
Scan equal 


CRDKSCEQ 






CRDKUSH 


X'02' 


Unshuffling to make 






CRDKWRCL 


X'09' 


Write class 






CRDKVRCL 


X'OC' 


Verify class 






CRDKCTDA 


X'10" 


Count and data class 






CRDKSHU 


X'18' 


Shuffling to make 






CRDKINCA 


X'AO' 


Increasing address command 






CRDKRDCD 


X'B2' 


Read count and data 






CRDKFFKY 


X'CO' 


S/370 search command with X'FF' in 
key area 


1438 


59E 


CRDKEXC1 


X'80' 


Control byte 1 of IISDF 
First EXCP loop 


CRDKLP1 






CRDKLSLP 


X'40 1 


Last EXCP loop 






CRDKEXT2 


X'20' 


Extent 2 used 






CRDKRCSC 


X"08' 


Read count successful 






CRDKEXRD 


X'04' 


Extra read requested. Hit for LE or HE 






CRDKWAIT 


X'02' 


Wait requested 






CRDKNSID 


X'01' 


Indicator for identifier conversion 


1439 


59F 


CRDKEXC2 


X'80" 


Control byte 2 of IISDF 
Delay routine called 


CRDKDELY 






CRDKBDEX 


X'40' 


Bad extents information 






CRDKPART 


X'20' 


Data partially processed 






CRDKIOOP 


X'10' 


DOS I/O indicator 






CRDKEQUA 


X'08' 


Equality in compare routine 






CRDKHNEQ 


X'04' 


Hit not equal in compare routine 






CRDKINID 


X'02' 


Increasing ID addresses 






CRD Kl EXT 


X'01' 


One extent already given 


1440 


5A0 


CRDKDFDB 




S/370 CCW control dispatching byte 






CRDKDFCW 


X'80' 


Caller wants CCW control 






CRDKDFID 


X'40' 


Caller wants ID conversion 


1441 


5A1 


CRDKDDDB 


X'80' 


IISDD control byte 
Caller wants EXCP 


CRDKDDEX 






CRDKDDOP 


X'40' 


Caller wants OPEN 


1442 
1498 


5A2 
5DA 


CRDKDSCT 


xxxx xxxx 


Description count for CCW builder 
Trace of first skip to channel 1 


CRTRSKPS 





EDBl 


.AYOUT 

Hex 


4 

8 

C 

10 

14 

18 


4 
8 
C 
10 
14 
18 


4 
8 
C 
10 
14 


2501/2520/2560 


Card Reader 






Dec 


1 1 





EDBCTLBK 
A(DOS CCB) 


4 


EDBINT 

A(end of operation routine) 


8 


EDBCNTC 

Current DILCOUNT 


EDBCNTS 

Standard DILCOUNT value 


12 


EDBTYPE 

• 


EDBINTMK 
Int. mask 


EDBFLAG 

• 


EDBSS 
Select stacker 


16 


EDBDATAL 
Data count 


not used 


20 


EDBRDBUF 

A(read card buffer) 


24 


EDBDATAD 

Data address for read operation 




2520/2560 Card Read Punch 







EDBCTLBK 
A(DOS CCB) 


4 


EDBINT 

A(end of operation routine) 


8 


EDBCNTC 

Current DILCOUNT 


EDBCNTS 

Standard DILCOUNT value 


12 


EDBTYPE 

• 


EDBINTMK 
Int. mask 


EDBFLAG 


EDBSS 
Select stacker 


16 


EDBDATAL 
Data count 


not used 


20 


EDBRDBUF 

A(read card buffer) 


24 


EDBDATAD 

Data address for read operation 




1442 Card Punch 







EDBCTLBK 
A(DOS CCB) 


4 


EDBINT 

A(end of operation routine) 


8 


EDBCNTC 

Current DILCOUNT 


EDBCNTS 

Standard DILCOUNT value 


12 


EDBTYPE 

• 


EDBINTMK 
Int. mask 


EDBFLAG 

e 


EDBSS 
Select stacker 


16 


EDBPNBUF* 

Save area for ERP(address) 


20 


EDBPNCNT* 
Count for ERP 


not used* 



*When emulated by 2540 Card Read Punch 
• See Flag bytes layout 



EDB LAYOUT (....Cont'd) 



12 C 

16 10 

20 14 

24 18 

28 1C 

32 20 



4 4 

8 8 

12 C 

16 10 

20 14 

24 18 

28 1C 

32 20 

36 24 

40 28 

44 2C 



EDBCTLBK 
A(DOS CCB) 



EDBINT 

A(end of operation routine) 



EDBCNTC 

Current DILCOUNT 



EDBDATAL 
Data count 



EDBINTMK 
Int. mask 



EDBCNTS 

Standard DILCOUNT value 



EDBSSF2 
SS feed2 



EDBSSF1 
SS feedl 



EDBSSPN 
SS punch 



EDBRDBUF 

A(recd card buffer) 



EDBDATAD 

Data address for read operatic 



EDBSTAT** I EDBWCHSL**] 
Card position Head selection 



EDBWCHD** 
Head se lectio 



Storage Control 



* MFCM with Print card 



EDBCTLBK 
A(DTFPH) 


EDBINT 

A(end of operation routine) 


EDBCNTC 

Current DILCOUNT 


EDBCNTS 

Standard DILCOUNT value 


EDBTYPE 

o 


EDBINTMK 
Int. mask 


EDBFLAG 

e 


EDBFLAG2 

e 


EDBLONG 
Length of EDB 




EDBCSW 

CSW for the device 


not used 


EDBSENSE 






Sense status 


EDBMXCL 
Max cyl no 


EDBHDSEL 
Last head 


EDBSKCL 
Last seek 






EDBEXT1 
Extent table nr 1 


EDBRECTK 
S/370 records/ 
track 


EDBEXT2 
Extent table nr 


2 








EDBTKCYL 
S/370 track/ 
cyl 


not used 



O See Flag bytes layout 

IV- 17 



EDB 


-AYOirr (.. 

Hex 


4 

8 

C 

10 

14 

18 

1C 


4 
8 
C 
10 


4 
8 
C 


.Cont'd) 
I/O Channel 








Dec 


1 1 





EDBCTLBK 
A(DOS CCB) 


4 


EDBINT 

A(end of operation routine) 


8 


EDBCNTC 

Current DILCOUNT 


EDBCNTS 

Standard DILCOUNT value 


12 


EDBTYPE 

• 


EDBINTMK 
Int. mask 


EDBFLAG 

e 


EDBFLAG2 

• 


16 


EDBLONG 
Length of EDB 




20 


EDBCSW 

CSW for the device 


24 


EDBRECRD 
Record counter 


EDBTM 
File counter 


28 


EDBSVREC 

Record and file counter when U 


C in CCB 




1403/2203 Printer 







EDBCTLBK 
A(DOS CCB) 


4 


EDBINT 

A(end of operation routine) 


8 


EDBCNTC 

Current DILCOUNT 


EDBCNTS 

Standard DILCOUNT value 


12 


EDBTYPE 

© 


EDBINTMK 
Int. mask 


EDBFLAG 

• 


EDBELOP 
Delay code 


16 


EDBLENG 
Line length 


EDBRESPA 
Residual space 


not used 




2152 Printer Keyboard 







EDBCTLBK 
A(DOS CCB) 


4 


EDBINT 

A(end of operation routine) 


8 


EDBCNTC 

Current DILCOUNT 


EDBCNTS 

Standard DILCOUNT value 


12 


EDBTYPE 

• 


EDBINTMK 
Int. mask 


EDBFLAG 

• 


EDBNASAL 

ASA carrier 

return 



• See F lag bytes layout 



EDB LAYOUT (....Cont'd) 





Hex 


4 

8 

C 

10 

14 

18 

1C 

20 

24 

28 


Extension for Device Independen 




Dec 






1 





EDBDIST 

o 


EDBDIST2 

• 


EDBBLKF 
Blocking factor 


4 


EDBBLKSZ 
Block size 


EDBCCTLG 

Length carriage ctl tape 


8 


EDBCTID 

Index of carriage tape image 


12 


EDBDTFPT 
A(active DTF) 


16 


EDBDTFIT 
A(input tape DTF) 


20 


EDBDTFOT 
A(output tape DTF) 


24 


EDBDTFID 
A(input disk DTF) 


28 


EDBDTFOD 
A(output disk DTF) 


32 


EDBBFADD 

A(output device independence buffer) 


36 


EDBIOREG 

A(last logical record in buffer) 


40 


EDBDIA5A 

ASA control character 



O See Flag bytes layout 



EDB FLAGBYTES LAYOUT 



Displacement 



Bytes 



Field description 



EDBTYPE 

EDBSC 

EDB 1442 

EDB2501 

EDB2520 

EDB2520P 

EDBMFCM1 

EDBMFCM2 

EDBPRINT 

EDBPK 

EDBIDC 

EDBFLAG 

EDBLSTCP 
EDBFEED 

EDBTODEV 



EDBMESG 
EDBDI 



EDBPNER 
EDBMESG 
EDBDI 

EDBLSTCD 
EDBFEED 



EDBPNER 
EDBMESG 
EDBDI 

EDBCH9 

EDBCH 12 

EDBCH9B 

EDBCH12B 

EDBCH1 

EDBNCM 

EDBMESG 

EDBDI 



1111 
I... 
.].. 
..1. 
...1 


1111 

I... 
.1.. 
..1. 
...1 



Definition of the M20 device: 

Disk 

1442 Card Punch 
2501 Cord Reader 
2520 Card Read Punch 
2520 Card Punch 
2560 MFCM (feed 1) 
2560 MFCM (feed 2) 
1403/2203 Printer 
2152 Printer Keyboard 
Tape 

M20 indicators for: 



Last card 

Previous M20 operation included 

a feed for 2520 Card Read Punch 

2520 Card Read Punch is emulated 

by 3525 Card Punch; or 2560 

MFCM is emulated by 3525 Card 

Punch 

First request to execute CIO SS in- 
struction during device independence 
Pending message 
EDB includes device independence 



1442/2520 Card Punch is emulated 

on 2520/3525 Card Punch 

1442/2520 punch error 

Pending message 

EDB includes device independence 



Last card 

Previous M20 operation included 
a feed for 2520 Card Read Punch 
2520 Card Read Punch is emulated 
by 3525 Card Punch; or 2560 
MFCM is emulated by 3525 
First request for punch or punch- 
feed on 3505 Card Reader 
First request for write card on 3505 
Card Reader 
Punch error 
Pending message 
EDB includes device independence 

Channel 9 

Channel 12 

Channel 9 with dual feed carriage 

Channel 12 with dual feed carriage 

Channel 1 

No carriage motion 

Pending message 

EDB includes device independence 



EDB FLAGBYTES LAYOUT (. . . .Cont'd) 



Displacement 


Field name 


Bytes 


Field description 


Dec Hex 




EDBREQPK 


1 


Enable/disable 


£ 




EDBREQST 


.1 


Request stored 


B 




EDBCNCL 


..1 


Cancel 


7 




EDBMESG 
EDBLSTBK 


1. 

1 


Pending message 


7\ 


Last EDB 






EDBDEVB 


.1 


Device busy 






EDBDEVI 


..1 


Device-end interrupt pending 






EDBREQ1 




First request 


O 




EDBCTLL 


.... 1... 


Long control operation 


S 




EDBCEIN 


1.. 


Channel-end interrupt pending 


n 




EDBDELN 


1. 


Delay on 




15 F 


EDBDELY 
EDBFLAG2 


1 


Delay off 




M20 IOC/SC indicators for: 






EDBCHBIT 


I 


Chained IOC operation 
IOC program check 






EDBPGCHK 


.1 






EDBSCFT 


..1 


S/370 device has scan feature 






EDBRDAH 


..1 


Read ahead (IOC) 






EDBOPEN 


...1 .... 


DOS disk pack representing 
M20 disk pack is open 






EDBCTOPT 




Non standard disk count field found 
in M20 core during a write count 
and data or verify count and data 
operation 






EDBUCBIT 


1.. 


Unit check on S/370 device during 
tape operation 






EDBSNSDN 


1. 


Sense done for file protect (IOC) 






EDBFILDPR 


1 


Tape in file protect (IOC) 






EDBWDATA 


1 


Previous Write data set 




36 24 


EDBDIST 

EDBDITP 

EDBDIDK 

EDBDIACT 

EDBDIAD 

EDBIOPN 

EDBFNRD 

EDBFNPN 

EDBFNPT 


1 

.1 

..1 

...1 .... 
.... 1... 

1.. 

1. 

1 


Device independence 

Generated for tape 
Generated for disk 
Active on tape 
Active on disk 
File opened 
Read 
Punch 
Print 




37 25 


EDBDIST2 

EDBDICHG 
EDBSIZ 


1 

.1 


Device independence indicators 

MFCM emulated by two 3525's 
Input record size is 80 





INTER - ROUTINE LINKS FOR COMMUNICATION ROUTINES 





-T? dilcount 




IISTR 
emulated 
instr trace 




load & call . 
















> f 












IISHCcr 

communication 

control 


IISHF1 or 2 








IISINeir 
emulator 
interrupt 

routine 


on a comm req fc 






at completion 




DIL 


at comm compl 




IISHCejr 


IISHFfs 
function scan 


B transient 


Interrupt 














to request an interrupt 


iTsHCFk "" 
interrupt 
key routine 




























;k 










DOS supervisor 








External 


interrupt (Interrupt key or 
Attn MSG command) 





INTER - ROUTINE LINKS - Except communication routines 





XIO 






CIO 


J 


-o- 


TIOB 


— ► 



I IS ID I/O decode 



XIO,CIO,TIOB t 



IISD1 or D2or MF 

or PD2 or MD2 

or D3 or D4 or DE 

UR secondary I/O decode 



tape & disk XIO 



some CIO,TIOB 



IISCMor IISCMS 
UR common module 



me s haring off | 



post 360/20 op 



timesharing on 



360/20 interrupt to be generated 



© Trap points when using 
the EDF command 



IISTD tape and disk 
secondary I/O decode 



f test I/ O no overla P 

start I/O tape . 



IISTDdl delay routine 



IISTP tape emulatio 



IISINeir 
emulator 
interrupt 
routine 



IISINtir 
360/20 
interrupt 



overlap 



LL-overlap no delay 
-post 360/20 od 



delay OFF 



IISDK 
360/20 disk dependent 



I1SDF CCW builder 



IISDD DOS interface 



post 360/20 op 



for message 



HFUNTAB ENTRIES 



Routine 


Control 

Statement 

Handled 




Entry 


in HFUNTAB for th 


is routine 




Displacement 
in HFUNTAB 
of entry 

Dec Hex 


Bytes 1-2 

Routine 

Identifier 

(in Hex) 


Byte 3 
Displacement 

Branch table • 
Dec Hex 


Byte 4 


Byte 5 


Byte 6 


Displacement in HFUNTAB of entry for 
routine to be called when: 


return code= 


return code= -1 


return code= -2 


IISHFIN 




HF 


4 4 


194 (C2) 
(IISHFMSG) 


205 (CD) 
(IISHCCR) 


208 (DO) 
(IISHCEIR) 





IISHFCMR 




HF 


12 C 


205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




6 6 


IISHFS 


S 


HF 


24 18 


200 (CB) 
(IISHFEX) 


208 (DO) 
(IISHCEIR) 


194 (C2) 
(IISHFMSG) 


11 0B 


SSBIISLE 


EOJ 


LE 


8 8 


194 (C2) 
(IISHFMSG) 


180 (B4) 
(IISDIBF) 




17 11 


$$BIISTS 


1 


TS 


8 8 


205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




22 16 


MBIISCF 


CF 


CF 




205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




27 IB 


IISHFSK 


RCC keyword 
scanning 


HF 


16 10 


32 (20) 
($$BIISTS) 






32 20 


$$BIISTS 


RCC 


TS 





205 (CD) 
(IISHCCR) 


194 (C2) . 
(IISHFMSG) 




36 24 


$$BIISLE 


SR 


LE 


4 4 


205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




41 29 


IISHFCP 


CP 


HF 


28 1C 


205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




46 2E 



HFUNTAB ENTRIES (....Cont'd) 



Routine 


Control 

Statement 

Handled 




Entry 


in HFUNTAB for this routine 




Displacement 
in HFUNTAB 
of entry 

Dec Hex 


Bytes 1-2 

Routine 

Identifier 

(in Hex) 


Byte 3 
Displacement 

Branch table • 
Dec Hex 


Byte 4 1 Byte 5 


Byte 6 


Displacement in HFUNTAB of entry for 
routine to be called when: 


return code= 


return code= -1 


return code= -2 


IISHFSK 


LD keyword 
scanning 


HF 


16 10 


55 (37) 
(SSBIISLE) 






51 33 


SSBIISLE 


LD 


LE 





208 (DO) 
(IISHCEIR) 


194 (C2) 
(IISHFMSG) 


180 (B4) 
(IISDIBF) 


55 37 


IISHFDIC 


HELP 


HF 


32 20 


61 (3D) 
(SSBIISPR) 


66 (42) 
(SSBIISDP) 




61 3D 


SSBIISPR 


HELP (exeptfor 
device indep.) 


PR 




194 (C2) 
(IISHFMSG) 






66 42 


SSBIISDP 


HELP (for dev. 
independence) 


DP 




194 (C2) 
(IISHFMSG) 






70 46 


IISHFSK 


CCT keyword 
scanning 


HF 


16 10 


78 (4E) 
(SSBIISCC) 






74 4A 


SSBIISCC 


CCT 


CC 




205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




78 4E 


IISHFSK 


CS keyword 
scanning 


HF 


16 10 


87 (57) 
(SSBIISCS) 






83 53 


SSBIISCS 


CS 


CS 




205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




87 57 


IISHFSK 


DF keyword 
scanning 


HF 


16 10 


96 (60) 
(SSBIISDF) 






92 5C 



HFUNTAB ENTRIES (....Cont'd) 



Routine 


Control 

Statement 

Handled 




Entry 


'n HFUNTAB for this routine 


Displacement 
in HFUNTAB 
of entry 

Dec Hex 


Bytes 1-2 

Routine 

Identifier 

(in Hex) 


Byte 3 
Displacement 

Branch table* 
Dec Hex 


Byte 4 


Byte 5 


Byte 6 


Displacement in HFUNTAB of entry for 
routine to be called when: 


return code=0 


return code= -1 


return code= -2 


$$BIISDF 


DF 


DF 




205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




96 60 


IISHFSK 


TS keyword 
scanning 


■ HF 


16 10 


105 (69) 
(SSBIISTS) 






101 65 


$$BIISTS 


TS 


TS 


4 4 


205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




105 69 


IISHFSK 


DK keyword 
scanning 


HF 


16 10 


1 14 (72) 
(SSBIISTD) 






110 6E 


$$BIISTD 


DK 


TD 


4 4 


205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




114 72 


IISHFSK 


TP keyword 
scanning 


HF 


16 10 


123 (7B) 
($$BIISTD) 






119 77 


$$BIISTD 


TP 


TD 





205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




123 7B 


IISHFSK 


UR keyword 
scanning 


HF 


16 10 


132 (84) 
($$BIISUR) 






128 80 


$$BIISUR 


UR 


UR 




205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




132 84 


IISHFSK 


EC keyword 
scanning 


HF 


16 10 


141 (8D) 
(SIBIISTD) 






137 89 



HFUNTAB ENTRIES (....Cont'd) 



Routine 


Control 

Statement 

Handled 




Entry 


in HFUNTAB for th 


s routine 




Displacement 
in HFUNTAB 
of entry 

Dec Hex 


Byte 1-2 
Routine 
Identifier 

(in Hex) 


Byte 3 
Displacement 

Branch table* 
Dec Hex 


Byte 4 


Byte 5 


Byte 6 


Displacement in HFUNTAB of entry for 
routine to be called when: 


return code=0 


return code= -1 


return code= -2 


SSBIISTD 


EC 


TD 


8 8 


205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




141 8D 


IISHFSK 


EDF keyword 
scanning 


HF 


16 10 


150 (96) 
(IISEDF) 






146 92 


IISEDF 


EDF 


HD 




205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




150 96 


SSBIISCT 


CNT 


CT 




205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




155 9B 


IISHFSK 


Dl keyword 
scanning 


HF 


16 10 


164 (A4) 
($SBIISDI) 






160 A0 


$SBIISDI 


Dl 


Dl 




205 (CD) 
(IISHCCR 


194 (C2) 
(IISHFMSG) 


180 (B4) 
(IISDIBF) 


164 A4 


IISHFSK 


DIA keyword 
scanning 


HF 


16 10 


174 (AE) 
(SSBIISAS) 






170 AA 


$$BIISAS 


DIA 


AS 




205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 


(180 (B4) 
(IISDIBF) 


174 AE 


IISDIBF 




HB 




205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




180 B4 


IISHFSK 


CD keyword 


HF 


16 10 


189 (BD) 
(SSBIISCD) 






185 B9 



HFUNTAB ENTRIES (....Cont'd) 



Routine 


Control 

Statement 

Handled 




Entry 


in HFUNTAB for this routino 


Displacement 
in HFUNTAB 
of entry 

Dec Hex 


Byte 1-2 
Routine 
Identifier 

(in Hex) 


Byte 3 
Displacement 

in 
Branch table • 

Dec Hex 


Byto4 


Byte 5 


Byte 6 


Displacement in HFUNTAB of entry for 
routine to be called when: 


return code= 


return codo= -1 


return code= -2 


$$BIISCD 


CD 


CD 




205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




189 BD 


IISHFMSG 




HF 


20 14 


205 (CD) 
(IISHCCR) 


200 (C8) 
(IISHFEX) 


211 (D3) 
(SSBIISLE) 


194 C2 


IISHFEX 




HF 


8 8 


208 (DO) 
(IISHCEIR) 


205 (CD) 
(IISHCCR) 




200 C8 


IISHCCR 




HC 










205 CD 


IISHCEIR 




HC 










208 DO 


$$BIISLE 




LE 


12 C 








211 D3 



• For routines with a HF identifier, the branch table is HFRTNTAB (contained in IISHF) 
For routines with a LE identifier, the branch table is LDBRANCH (contained in $$BIISLE) 
For routines with a TD identifier, the branch table is TDTAB (contained in SSBIISTD) 

For routines with a TS identifier, the branch table is TSTAB (contained in $$BIISTS) 

R8 contains a return code 

R7 = HFBRTAB points to HFRTNTAB 

R9 = HFUNCPTR points to HFUNTAB 



PROBLEM DETERMINATION AIDS 



Dynamic Service Aids (Depend on emulator generation option) - See notes 



FORMAT OF COMMANDS 

DF TD=(X'hhhh , ,X , hhhh') 

ED=(X , hhhhhh , ,X , hhhhhh') 

TT 

TTS 

EDF IOT= (d,xct) 
IOT= (n,st) 
IOT=(X'hh',st) 
IOTS= y 



emulated core dump 
emulator core dump 
emulated instruction trace 
trace stop 

Unit record 
Disk or tape 

stop list 



d= device 

x= list of emulator control blocks before and after execution of XIO 

c= list of emulator control blocks before and after execution of CIO 

t= list of emulator control blocks before and after execution of TIO 

n= 1 to 4, M20 disk storage address 

hh= 01 to FF, M20 magnetic tape address 

s= list of emulator control blocks before and after execution of Start I/O 

t= list of emulator control blocks before and after execution of Test I/O 

Notes: 

You ccn code TT only if you have coded DEBUG= TT or IOT in the EM20CPU 
macro instruction. 

You can code EDF only if you have coded DEBUG= IOT in the EM20CPU 
macro instruction. 



INFORMATION OUTPUT 



1st line 
2d line 
next lines 



360/20 GPR's 8 to 15 

360/20 old PSW, 360/20 new PSW, stacker info, CSW 

core contents 



line 1-2 : S/370 GPR's to 15 
next lines : core contents 



TT on the same line: 

A (instruction in process) 

instruction 

current 360/20 PSW 

360/20 GPR's 8 to 15 

360/20 old PSW 

360/20 new PSW 

360/20 CSW 

IOT See table on next page. 



PROBLEM DETERMINATION AIDS (. . . .Cont'd) 





Trace fields shown before (B) and after (A) execution 
of Model 20 I/O instruction 




Unit Record 


Tape 


Disk 




CIO 
XIO 


TIOB 


SIO 


TIO 


SIO 1 


SIO 2 


TIO 


S/370 registers 


B A 


B A 


B A 


B A 


B A 


B 


B A 


M20 registers 


B A 




B A 


B A 


B A 


B 


B A 


M20 instructions 


B A 


B A 


B A 


B A 


B A 




B A 


M20PSW 


B A 


B A 


B A 


B A 


B A 


B 


B A 


CRIOACT 


B A 


B A 


B A 


B A 


B A 


B 


B A 


CRINTFLG 


B A 


B A 


B A 


B A 


B A 


B 


B A 


EDB 


B A 


A 


B A 


B A 


B A 


B 


B A 


CCB 


B A 




A 


A 


A 


B 


A 


CREMUIND 


B A 








A 


B 




S/370 CCW 


A 




A 




A 


B 




M20CCW 






B A 


B A 


B A 




B A 


M20CSW 






A 


A 


A 


B 


A 


Communication region 
disk fields 










A 


B 




Disk count area 










B 






I A routine other than 1 


SDD has control 




2 1ISDD has control 







EMULATOR ROUTINE IN ERROR 

If an emulator message has been issued, the explanation should give some idea as to 
the nature of the error. The PLM lists all the routines that can issue a particular 
message. 

When an abnormal DOS termination occurs, the DOS PSW and GPR's are located in 
the communication region at CRSAVCPU. 

Use; • the address of the interrupted PSW 

• the contents of registers 4, 14, 15 

• the linkedit map 

COMMUNICATION REGION 



• GPR 3 should point to it, which is on a 256 byte boundary 

• If GPR 3 does not point to the communication region, locate IISCR in the linkedit 
map; it is located at the next upper 256 byte boundary address 



PROBLEM DETERMINATION AIDS (....Cont'd) 



EMULATED MOD 20 MAIN STORAGE 

Beginning address : CRMAPORG 
Ending address : CRMAPEND 
M20 main storage is bounded at the end by 98xxxxxx 

CONTROL BLOCKS AND BUFFERS 

e EDB's addresses : CRDEVTAB 

• If M20 disks are emulated and device independence option is chosen at emulator 
generation, EDB's addresses are in the CSECT IISEDBCS 

• If they are not, the EDB's for unit record devices are moved to the communication 
region at initialization time. Should there not be enough space, any remaining 
EDB's are generated in a separate CSECT (IISEDBCS) 

a Pointers in EDB's locate CCBS and DTFS 

• CCB or DTF for emulated disks are found in the first fullword of the EDB 
For device independence: 

Four fullwords in an extension of the EDB point to the DTFMT's and DTFSD's. 
The address of the buffer for the device is found in its EDB 

REGISTER USAGE AND NAMES 



Reg 


ster 1 


CCBREG 


pointer to DOS CCB 


Reg 


ster 2 


EDBPNT 


pointer to EDB 


Reg 


ster 3 


COMREG 


pointer to the communication region 


Reg 


ster 4 


BASOP 


Base register 


Reg 


ster 5 


EFFADD1 


M20 operand 1 address 


Reg 


ster 6 


EFFADD2 


M20 operand 2 address 


Reg 


ster 7 


MODIFIER 


M20 instruction length or immediate field 


Reg 


ster 14 


LINK 


return address 


Reg 


ster 15 




used as a base register for all B transient emulator 



DIL macro instruction sets registers 4, 5, 6 and 7 before giving control to an emulator 



EMULATOR DUMP 

The following items can be found in COMREG : 

e M20 address (i.e. relocation factor) CRMAPORG 

e Contents of M20 registers 8 to 15 CRSAVM20 

e M20 PSW (address of the current instruction) CRM20PSW 

• First two bytes of the previous M20 instruction CRBYTE12 

e The contents of the l-recall register CR1RCAL 



MODEL 20 SECTOR TO SYSTEM/370 DISK RECORD CORRESPONDENCE 



Model 20 record 



I | Count Area | | Record Area | | 



S/370 record 



|HA| Record | | Count Area | | Key Area | | Data Area | |Data Record 2 



MODEL 20 STANDARD MAIN STORAGE COUNT FIELD 



Byte 

X, 









Cylinder 
Address 





Head 
Address 


Record 
Number 





Data Length 270 




IISEOJ 

End of process 

Closo filos and volumos 

EOJ 
(cancel If oof Issued 
durlno cord proofing) 



Chock 
UM20,UDOS 



Phase 
'diname' 

1 1 SMS 
IISMSG 
IISCG 
IISMD 



diname 

dinamel 
diname2 
diname3 
diname4 
diname5 
diname6 
diname7 



Phase 
'dinamel ' 



control among device independence routines, message processing, control card processing, 

DTFDAs for DPS files with verify, DTFCN, DTFDI,and DIMOD for SYSLST and SYSIPT, DAMOD 

DTFDAs for DPS files with verify specified 

DPS file initialization, DPS VTOC and volume processing, and documentation 

SAM file processing, DTFSDs, SDMODFO (forward) 

SDMODFI (backward only) 

DTFDAs, DAM processing 

DTFIS (load), ISMOD (load), forward 

DTFIS (retrieve), ISMOD (retrieve), backward 



IISSCI 




Phase 
diname3' 






Phase 
'diname6' 




Phase 
'diname7' 






USDS 


IISIF 
IISILn 
IISML 




IISIB 
IISIRn 
IISMR 


IISTK 
IISTKC 
IISTKE 
IISEQ 
IISTKI 






Phase 'diname5' 






IISDA 
IISTn 




IISSQ 
USSn 


Phase 'dinam 


5 4' 




IISMI 


1 IlSMOl- 





DATA INTERCHANGE COMMUNICATION REGION 






(0) 


4 


(4) 


8 


(8) 


12 


(C) 


16 


(10) 


20 


04) 


24 


(18) 


28 


OC) 



Operation comm 


unicatio 


n control block (CRHCB) 




A (card buffer) 


CRHBFCDA 


A (print buffer) 


CRHBFPRA 


A (DTFCN) 


CRHDFCNA 


A (DTFDI SYSLST) 


CRHDFDIA 


. CRHMSGN 


. CRHPMSGN 


A (beginning of variable data in card buffer) CRHVADD 


CRHIMSGN 


CRHFLAGS 

• 


CRHFLP2 


CRHSCMSG 


CRHREPLY 

A 


CRHERTYP 

t . 


not used 



(20) 

(24) 
(28) 



Generation control block (CRGCB) 



Program name 



first blank C ggmm T nam e [.CRGDEV20 |,CRGDEVDS 



Control cards block (CRCCB) 



84 


(54) 


88 


(58) 


92 


(5C) 


96 


(60) 


100 


(64) 


104 


(68) 


108 


(6C) 


112 


(70) 


116 


(74) 


120 


(78) 


124 


(7C) 



M20 file identifier 



CRCFLNM 
File name for DOS representing a DPS file 



CRCFDOS 
File name for DOS file 



CRCFLNP 
first blank in CRCFLNM 



System date YDD CRCSYSD 



CRCDDDM 
days in system year 



v block size for DOS file 



ISAM CRDFI ID * CRCOPT 

ibAM > RDELI[ | SAM o CRCINDIC 



For further explanation see the end of the table 
IV- 35 



DATA INTERCHANGE COMMUNICATION REGION (... .Cont'd) 

Data interchange structure block (CRCSB) 
1 . locates DTFs 
2. gives buffer allocation before execution: 



128 


(80) 


132 


(84) 


136 


(88) 


140 


(8C) 


144 


(90) 


148 


(94) 


152 


(98) 


156 


(9C) 


160 


(A0) 


164 


(A4) 


168 


(A8) 



A (USSn) DTFSD DOS file 


CRSDDFSD 


A (IISTn) DTFDA DOS file 


CRSDDFDA 


A (ISEQ parameter table) 


CRISPTR 


A (IISLn) DTFIS load DOS file 


CRSDFISL 


A (IISRn) DTFIS retrieve DOS file 


CRSDFISR 


A (CRSBUFSC3) 


CRSECTA 


A (current DTF for DOS file) 


CRSDDFA 


A (first DTFDA for M20 file) 


CRSMDFA1 


A (current DTF for M20 file) 


CRSMDFP 


A (second DTFDA for M20 file) 


CRSMDFA2 


A (third DTFDA for M20 file) 


CRSMDFA3 



Data interchange structure block (ZRSCB) 



128 


(80) 


132 


(84) 


136 


(88) 


140 


(8C) 


144 


(90) 


148 


(94) 


152 


(98) 


156 


(9C) 


160 


(A0) 


164 


(A4) 


168 


(A8) 



A (DPS block area) 


CRSMBA 


A (work area DPS cylinder index) 


CRSMCYWA 


A (ISEQ parameter table) 


CRISPTR 


A (work area DPS track index) 


CRSMTKWA 


• 


CRDOSIA 


A (CRBUFSC3) 


CRSECTA 


A (DOS DTF) according to selected 
option 


CRSDDFA 


• 


CRSMDFA1 


A (current DTF for M20 file) 


CRSMDFP 


• 


CRSCYDFA 


• 


CRSOVDFA 



• For further explanation see the end of the table 
IV -36 



OATA INTERCHANGE COMMUNICATION REGION (....Cont'd) 



File control block (CRFCB) (file identification part) 

Has the same format as the M20 standard file label from bytes 0-92 



(AC) 



212 


(D4) 


216 


(D8) 


220 


(DC) 


224 


(E0) 


228 


(E4) 


232 


(E8) 


252 


(FC) 


256 


000) 


260 


(104) 


264 


(108) 



- CRFFLID 
DPS file identification 




format 
identifier 






file serial numl 


CRFFSNBR 
er 


CRFVSNBR 
vol . seq. nmbr 


CRFVSNBR 


creation date CRFCRTD 


expiration date CRFEXPD 


CRFEXTCN 


^ not used 








file type 


CRFILTYP 




block length 


CRFBLKLG 


record length CRFRECLC 


CRFKEYLG 
key length 


CRFKEYLC 
key loc 


CRFKEYLC 









File control block (extent inform ation part) (CRECBEXT), same as Fl 



and F2 label, 10 bytes by extent 12 entries 
(max. nmbr of extents) 



268 (10C) 
272 (110) 



388 (184) 



392 


(188) 


396 


(18C) 


400 


(190) 


404 


(194) 


408 


(198) 



CRFEXNBR 
seq. number 



CCHH lower limit 



save area for cylinder Index extent 



CRFEXSTN 
first sector in extent 



CRFEXPTR 
:urrent extent 1 to 12 



CRFEXEDN 
last sector in extent 



CRFEXUP 
number of extents from Ibl 



CRFBFPT (next extent to be moved in CRECBEX1 



remaining extents CRFEXCHK 



• For further explanation : see end of the table 
IV -37 



DATA INTERCHANGE COMMUNICATION REGION (.. ..Cont'd) 



412 (19C) 
416 (1A0) 
420 (1A4) 



File control block, VTOC inform 
Processing of the M20 VTOC lab 


ation part (CRFCBVT) 
el 


410 (19A) 


CRFLEXLW 
first sector (DPS VTOC) 


last sector CRFCEXUP 


CRFFMT1 
first sector DPS Fl label 


C RFC VTOC 
VTOC sector being processed 


CRFVOLN 
DPS vol being processed 


VTOC 
o indicators 





424 


(1A8) 


428 


(1AC) 


432 


OBO) 


436 


(1B4) 


440 


0B8) 


444 


OBC) 


448 


(ICO) 


452 


(1C4) 


456 


0C8) 


460 


OCC) 


464 


DO) 


468 


0D4) 


472 


0D8) 



File control block, documentation part (CRFCBDOC) 
Fields used in processing DPS files documentation 



CRFVBLK 
block size max. allowed 



CRFDOFLG 
offset last record 



CRFTRKC 
Dos file track capacity 



CRFMSTK 
sectors / tracks 



CRFDKYLG DOS tracks required CRFTRKN 



number of records processed (DOS or DPS) CRFDRCC 



number of records left (extents too small) 



CRFDOCLP 
extents-print line 



Vol . ser. number current DPS volume 



block size current DPS file 



max. block size for the device (DOS) 



DOS block size specified or default value CRFDPSPBK 



. CRFVDIND not used 



• For further explanation : see end of the table 



DATA INTERCHANGE COMMUNICATION REGION (... .Cont'd) 



File control block, file conversion part 
(Fields related to forward and ba ckward copies) 



476 


(IDC) 


480 


OEO) 


484 


(1E4) 


488 


(1E8) 


492 


(1EC) 


496 


(1F0) 


500 


0F4) 


504 


0F8) 


508 


(1FC) 


512 


(200) 


516 


(204) 



CRFDAEDN 
end of data area sector 



CRFBNRCB 
DPS blocking factor 



end DPS block 



CRFBNSCB 
lumber of sectors in DPS block 



CRFBFSCB 
beginning of DPS block 



CRDNRCB 
DOS blocking factor 



track reference in DTFDA for DPS file CRFMREF 



track reference in DTFDA for DOS file CRFDREF 



A (first prime data track) 



CRVF2D6 
overflow tracks 



CRVF2ADR 
sector number of F2 label 



520 


(208) 


596 


(254) 


600 


(258) 


720 


(2 DO) 


724 


(2D4) 


852 


(354) 


856 


(358) 


988 


(3DC) 


992 


OEO) 


1124 


(464) 


1128 


(468) 


1260 


(4EC) 



Buffers 




J 


*"card buffer 


CRBUFCD 




| CRBUFDEL 


"print buffer 


CRBUFPR 




ASA char | 


CRBUFSC1 




VrOC buffer part 1 


VTOC buffer part 2 


CRBUFSC2 




_J 


DPS sector buffer part 1 


CRBUFSC3 




1 




DPS sector buffer part 2 


CRBUFSC4 


1 







• For further explanation see the end of the table 
IV -39 



DATA INTERCHANGE COMMUNICATION REGION FLAG BYTE LAYOUT 



Displa 


:ement 


Field 


Bytes 


Field description 


Dec 


Hex 








16 


C 


CRHMSGN 


2 


Internal number of next priority 1 
message 


24 


18 


CRHIMSGN 


2 


Internal number of entry in message 
directory 


26 


1A 


CRHFLAGS 


1 


Message flags 






CRHTYI 


10000000 


Information 






CRHTYD 


01000000 


Decision 






CRHTYA 


00100000 


Action 






CRHTYB 


00001000 


Automat! c EOJ 






CRHTYC 


00000100 


Another to be printed 






CRHTYP 


00000010 


Message on printer keyboard 






CRHTYS 


00000001 


Message on SYSLST 


27 


IB 


CRHFLP2 


1 


Flags for priotity 2 messages 






CRHERMSG 


00000010 


Invalid response to action or 
decision message 






CRHPRMSG 


00000001 


HELP entered 


28 


IC 


CRHSMSG 


1 


Screening mask for message directory 






CRHSCVRY 


10000000 


Any reply is valid 






CRHSCEOJ 


01000000 


EOJ is valid 






CRHSCSKP 


00100000 


SKIP is valid 






CRHSCIGN 


00010000 


IGN is valid 






CRHSCRTY 


00001000 


RETRY is valid 


29 


ID 


CRHREPLY 


1 


Reply made by operator 






CRHRPVRY 


10000000 


Other than EOJ, SKIP, IGN, RETRY 






CRHRPEOJ 


01000000 


EOJ 






CRHRPSKP 


00100000 


SKIP 






CRHRPIGN 


00010000 


IGN 






CRHRPRTY 


00001000 


RETRY 


30 


IB 


CRHERTYP 


1 


Control card error type 


42 


2A 


CRGDEV20 


1 


DPS device specified at generation 






CRGM2011 


10000000 


2311 






CRGM2014 


01000000 


2314 or 2319 






CRGM2030 


00100000 


3330 






CRGM2040 


00010000 


3340 


43 


2B 


CRGDEVDS 


1 


DOS device specified at generation 






CRGDOS11 


10000000 


2311 






CRGDOS14 


01000000 


2314 or 2319 






CRGDOS30 


00100000 


3330 






CRGDOS40 


00010000 


3340 


106 


6A 


CRCNEXPD 


3 


New expiration date for M20 file YDD 


114 


72 


CRCTVNBR 


2 


Number of DPS volume to be processed 


120 


78 


CRCYLXVN 


2 


ISAM, DPS volume that contains the 
cylinder index. Default value is one 


122 


7A 


CRCDFLVN 


2 


ISAM, DPS volume that contains the 
independent overflow. Zero if no 
overflow area. 


124 


7C 


CRCDELP 


2 


ISAM copy. Position of delete byte 
in record zero if no record deletion 


126 


7E 


CRDDELID 


1 


ISAM copy. Delete byte, X'FF' is 
default. 



DATA INTERCHANGE COMMUNICATION REGION FLAG BYTE LAYOUT (....Cont'd) 



Disp 


acement 


Field 


Bytes 


Field description 


Dec 


Hex 








127 


7? 


CRCOPT 


Half byte 


Options 






CRCFWCY 


1000 


Forward 






CRCBWCY 


0100 


Backward 






CRCFDOC 


0010 


File documentation 






CRCVDOC 


0001 


Volume documentation 






CRCINDIC 


Half byte 


Indicators 






CRCVRFY 


1000 


Verify specified 






CRUISF 


0100 


UIS Card 


144 


09 


CRDOSIA 


4 


A(DOS IOAREA) for SAM and DAM 
or DOS WORKL for ISAM forward 


156 


9C 


CRSMDFA1 


4 


ISAM: 

A (DTF to process prime data area 

extent) 

Other file : 

A (DTF to process the extent) 


164 


A4 


CRSCYDFA 


4 


Non Isam file: 

points to DFDA addressed by 

CRSMDFA1 

ISAM Multivolume: 

A (DTFDA to process the cylinder index 

extent) except if cylinder index and 

independent overflow are on the same 


168 


A8 


CRSOVDFA 


4 


ISAM file: 

A(DTFDA to process independent 

overflow extent 

A(DTFDA to process the independent 

overflow extent and the cylinder index 

extent) if they are on the same volume 


254 


FE 


CRFILTYP 


2 


File type 






CRFISEQ 


X'8000' 


ISAM 






CRFSEQ 


X'4000' 


SAM 






CRFDA 


X'2000' 


DAM 


266 


10A 


CRFEXTYP 


1 


Extent type 






CRCYLTYP 


00000100 


Cylinder extent 






CROVTYP 


00000010 


Overflow area 






CRPDTYP 


00000010 


Prime data or consecutive area 


420 


1A4 




1 


VTOC indicators 


CRFVTOCF 


10000000 


First half of DPS sector being processed 










(bit 1 = indicates second half) 






CRFVTOCE 


01000000 


End of DPSVTOC has been encountered 






CRFVNOF1 


00100000 


No format 1 label 






CRFVNOF3 


00010000 


No format 3 label 






CRFVOLNB 


0000 1000 


Incorrect volume number 






CRVOLF1 


00000100 


Next Fl label to be read 






CRVOLF3 


00000010 


Next F3 label to be read 






CRINITSW 


00000001 


File to be opened (DPS file initialization) 


472 


ID8 


CRFVDIND 


1 


Documentation indicators 






CRFVDR2H 


10000000 


DPS record size greater than track 
capacity 






CRFVDB2H 


01000000 


DPS block size greater than track 
capacity 






CRFVDBDH 


00100000 


DOS block size greater than track 
capacity 






CRFVDBDM 


00010000 


DOS block size is not a multiple of 
DPS block size 






CRFYEXIN 


00001000 


No extent found in Fl label 



DATA INTERCHANGE COMMUNICATION REGION FLAG BYTE LAYOUT (Cont'd) 



Displacement 


Field 


Bytes 


Field description 


Dec 


Hex 








474 


ID4 


CRFDASTN 


2 


Sector number beginning of data area 

SAM=DPS cylinder ^ 

DAM=DPS extent J , 

,(..., ^Dc . > data area 

ISAM=DPS prime [ 

data cylinder J 


488 


1E8 


CRMERBYT 


2 


Error indicators from ERRBYTE DOS 
DTFDA defining the M20 file 


490 


1EA 


CRDERBYT 


2 


Error indicators from ERRBYTE DOS 
DTFDA defining the DOS file 
(DAM only) 


500 


1F4 


CRFDKEY 


8 


DOS file key (DA copy) which is the 
M20 ID (MBBCCHHR) 



Not e: GPR3 points to the data interchange communication region. 
Problem determination aids: use the diagnostics facilities of DOS/VS 



The Dl Program is not dependent on the Hardware compatibility feature / 7520 
and can run on any model supported by DOS/VS 



CHAPTER V 
14xx EMULATOR 



I 



1401/1440/1460 AND 1410/7010 COMPATIBILITY FEATURE INSTRUCTIONS 



1400 fetch, address trans- 
lation and indexing 



Branching to emulator 
routines for execution 
of most 1400 operations 



COMP 

Performs the 1400 compan 
function, providing a 
6-bit compare, for the 
internal format used by 
the emulator 

This instruction is not 
provided with the high 
speed feature for Model 
135HS 



Moves 1400 data within 
emulated storage 



MULDIV (1401 only) 

Performs the 1400 multiply 
and divide instruction 

This instruction is provided 
only with the high speed 
feature for Model 135HS 



Assists in emulating 1400 
branch operations 



VHVHVV 



B IF LAG 

Checks the AAR and BAR 
registers to make sure 
they contain valid 
addresses 

This instruction is treated 
as a no-operation with 
the high speed feature 
for Model 135HS 



ANUM 

Performs 1400 arithmetic 
operations (except 
multiply and divide) 



MIO 

Assists in emulating 1400 
input/output operations 
by moving data between 
buffers. System/370, and 
emulated 1400 core storage 

Converts data from EBCDIC 
to internal code and 
vice-versa 



Compatibility Feature Instruction Set 
High Speed Feature Instruction Set 



1401/1440/1460 AND 1410/7010 

HOW DIL INSTRUCTION FETCHES 1400 INSTRUCTION 




ENTRY v 
FOR A 



ADDRESS OF 
THE OPERATION- 
CODE TABLE 



BASE 
REGISTER 
FOR THE ADD 
ROUTINE 



Call the compati- 
bility feature to 
perform the add 
function 

Return to the com- 
patibility feature 
for interpretation 
of the instruction 
located by IAR 



1401/1440/1460 AND 1410/7010 

TAPES IN SPANNED FORMAT AND 1400 FORMAT 



'eginning 



DOS 
HEADER 
LABELS 



TAPE MARK 
RECORD 



TAPE MARK 
RECORD 



^C 



TAPE MARK 
RECORD 



DOS TRAILER LABELS 



y 



1400 FORMAT 

beginning 



TM = Tape mark BDW = Block descriptor word 

IRG= lnter-record gap SDW = Segment descriptor word 



;y 



s 


o 


1400 LABEL 


O 


2 

i— 


O 



1401/1440/1460 AND 1410/7010 





EMULATED 1400 CORE STORAGE IN SY 


STEM/37 


MAIN STORAGE 














FF FF FF 


FF 


FF , FF . FF 


FF 


i 


UlQCPORG(1401) 

IIRCPORG(1410) 

1 • 

MULATED 1400 
ORE STORAGE -: 




















E 
C 
























































1 












FF FF FF 


FF 


FF FF FF 


FF 













IIQCPEND(1401) 
IIRCPEND(1410)" 



SYSTEM/370 BYTE 


1400 CHARACTER 





blh 8 


1 


bit 4 


2 


bit 2 


3 


bit 1 


4 


bit B 


5 


bit A 


6 


bit M 


7 


bit always 



EXAMPLE: 

CWBA8421 
in BCD format becomes: 

8421 BAWC 
in internal format. 



1401/1440/1460 AND 1410/7010 COMPATIBILITY FEATURE 



REGISTER 


BYTE 


BYTES 1,2 AND 3 


COMMENTS 


2 


Zero 


Zero 


Work register for 
compatibility feature 


3(COMREG) 


Zero for valid 
address 


Communication region 
base register 


Binary address of 
communication region 


4 (BAR) 


Zero for valid 
address 


B - address register 


Binary address of 
current 1400 B - field 


5 (AAR) 


Zero for valid 
address 


A- address register 


Binary address of 
current 1400 A - field 


6 (IAR) 


DILCNT 


1400 instruction 
counter 


Binary address of next 
1400 instruction to be 
fetched 


7(BASOP) 


Control byte 


Emulation routine 
base register 


Binary address of 
emulation routine 



Contents of GPR 2 through GPR 7 used by the compatibility feature 



Emulator Unit Control Block (EUCB) 



One for each device to be emulated . 

Created at generation time, modified with emulator c 

statements. 



ntrol 



SUB For tape drive and UR device. 

DUB For each DA device. 

Followed by a disk extent table (DUBEXTPT) used 
to locate 1400 disks in CS format on S/370 disk pack 

EMDTF Interface between DOS logical or physical IOCS 
and emulation routines of the emulator. 
Contains: CCW and CCB or DTFPH for the file, 
EOF indicator, parity, error indicator, data address. 



Emulator Channel Control Block (1410/7010 only) (ECCB) 

For each emulated 1400 channel. 

Contains: channel status indicator, device assignment table, EAR, 

FAR, GAR, or HAR 



1401/1440/1460 PROGRAM ORGANIZATION 



Emulator program overlay tree: 

IIQCR01 

HOURS 

IIQUR1 * 

IIQ14DEB 

IIQINECB 

IIQOJED 

IIQSDR 

IIQMWTR 

IIQOACON 

IIQOBCON 

IIQINHF 



IIQINEIO 
IIQCCPRO 
IIQCCCS 
IIQCCMOD 



The CSECTs below the horizontal 
line on the left of the figure are 
overlayed when the execution phase 
is loaded into System/370 main 
storage. Note that the order of the 
CSECTs in the figure is the order 
in which they appear in main 
storage . 



IIQSTR 

IIQCPA 

IIQCPL 

IIQCPC 

IIQIDCS 

IIQEIOCS 

IIQEJR 

IIQBFEIO 

IIQTPMLU 

IIQMTMOD 

IIQNTDOS 

IIQVTDOS 

IIQDSDOS 

IIQDSMOD 

IIQDICS 

IIQDKCS 

IIQCN 

IIQCNMOD 

IIQIUDOS 

IIQEPE 

IIQMCE 

IIQAPA 

IIQMDM 

IIQCFFET 

IIQBR 

IIQCFCAT 

IIQBY 

IIQURMOD 

IIQINBF 



Emulator CSECTs (by funct 


on) 








Initialization 


CPU emulation 


I/O emulation 


Emulator 


Catalog and 










services 




IIQINENT 


IIQCPA 


IIQURS 


IIQDSMOD 


IIQ14DEB 


IIQCFFET 


IIQINECB 


IIQCPL 


IIQIDCS 


IIQDICS 


IIQOJED 


IIQCFCAT 


IIQINHF 


IIQCPC 


IIQEIOCS 


IIQDKCS 


IIQSDR 




IIQINEIO 


IIQCBPE 


IIQBFFIO 


IIQCN 


IIQMWTR 




IIQINBF 


IIQMCE 


IIQTPMLU 


IIQCNMOD 


IIQOACON 






IIQAPA 


IIQMTMOD 


IIQIUDOS 


IIQOBCON 






IIQMDM 


IIQNTDOS 


IIQURMOD 


IIQCCPRO 






IIQBR 


IIQVTDOS 


IIQUR1 * 


IIQCCCS 






IIQBY 


IIQDSDOS 




IIQCCMOD 

IIQSTR 

IIQEJR 





" Note: IIQUR1 is created if a carriage control tape is to be used on the S/370 printer 
(CARRCTL=NO) 



1401/1440/1460 DISK FORMAT 



PP bb 
2164 00 



EMUL 
CTL 



SECTOR 1 
100 bytes 



"«- 



LL bb 
108 00 



EMUL 
CTL 



SECTOR20 
100 bytes 



Format of a System/370 record representing a 1301 or 1311 track (sector mode) 



PP bb 

2992 00 


LL bb 
2988 00 


EMUL 
CTL 




TRACK 
2980 bytes 



Format of a System/370 record representing a 131 1 track (track mode) 



PP bb 

2555 00 


LL bb 
2551 00 


EMUL 
CTL 




TRACK 
2543 bytes 



Format of a System/370 record representing a 1301 track (track mode) 











)) 














(( 




1 


PP bb 


LL bb 


EMUL 


SECTOR 1 




LL bb 


EMUL SECTOR 5 


1044 00 


208 00 


CTL 


200 bytes 


;/ 


208 00 


CTL 200 bytes 










(( 







lat of a System/370 record representing a 1405 track 



PP bb : The first two bytes contain the length of the System/370 physical 

record; the last two are set to zero. 

LL bb : The first two bytes contain the length of a System/370 logical 

record; the last two are set to zero. 

EMULCTL : This 4-byte field is set to zero except for the first bit of the 
first byte: 

Bit = , move mode 
BitO = 1 , load mode 

SECTOR AND TRACK : This field contains t.Se 1400 data. 



Disk format 


Load mode 


Move mode 


1301 or 1311 sector 


90 


100 


mode 






1301 track mode 


2261 


2543 


1311 track mode 


2682 


2980 


1405 


176 


200 



Number of 1400 Characters in System/370 Disk Records 



1401/1440/1460 

1400 ADDRESSES AND CORRESPONDING MACHINE CODES 



ADDRESSES 
0000-3999 



ADDRESSES 
4000-7999 A-bit 
(O-Zone)over Units 
Position 



ADDRESSES 
8000-11999 B-bit 
(1 1 -Zone) over 
Units Position 



ADDRESSES 
12000-15999 A B-bits 
(12-Zone) over 
Units Position 



Addresses Codes 



Addresses Codes 



Addresses Codes 



Addresses 



Codes 



0000-0099 
0100-0199 
0200-0299 
0300-0399 
0400-0499 
0500-0599 
0600-0699 
0700-0799 
0800-0899 
0900-0999 



000-099 
100-199 
200-299 
300-399 
400-499 
500-599 
600-699 
700-799 
800-899 
900-999 



4000-4099 
4100-4199 
4200-4299 
4300-4399 
4400-4499 
4500-4599 
4600-4699 
4700-4799 
4800-4899 
4900-4999 



00x-O9Z 
10x-19Z 
20x-29Z 
30x-39Z 
40x-49Z 
50x-59Z 
60x-69Z 
70x-79Z 
80x-89Z 
90x-99Z 



8000-8099 
8100-8199 
8200-8299 
8300-8399 
8400-8499 
8500-8599 
8600-8699 
8700-8799 
8800-8899 
8900-8999 



OOp-OOR 
10p-19R 
20p-29R 
30p-39R 
40p-49R 
50p-59R 
60p-69R 
70p-79R 
80p-89R 
90p-99R 



12000- 
12100- 
12200- 
12300- 
12400- 
12500- 
12600- 
12700- 
12800- 
12900- 



•12099 
•12199 
•12299 
•12399 
•12499 
■12599 
■12699 
■12799 
■12899 
■12999 



00g-09l 
10g-19l 
20g-29l 
30g-39l 
40g-49| 
50g-59| 
60g-69l 
70g-79l 
80g-89l 
90g-99| 



1000-1099 
1100-1199 
1200-1299 
1300-1399 
1400-1499 
1500-1599 
1600-1699 
1700-1799 
1800-1899 
1900-1999 



x00-x99 5000-5099 x0x-x9Z 9000-9099 

/00-/99 5100-5199 /0x-/9Z 9100-9199 

S00-S99 5200-5299 S0x-S9Z 9200-9299 

T00-T99 5300-5399 T0x-T9Z 9300-9399 

U00-U99 5400-5499 U0x-U9Z 9400-9499 

V00-V99 5500-5599 V0x-V9Z 9500-9599 

WOO-V\09 5600-5699 W0x-W9Z 9600-9699 WOp-WRJl 3600-1 

X00-X99 5700-5799 X0x-X9Z 9700-9799 X0p-X9R 1 3700- 

Y00-Y99 5800-5899 Y0x-Y9Z 9800-9899 Y0p-Y9R 13800- 

Z00-Z99 5900-5999 Z0x-Z9R 9900-9999 



x0p-x9R 
/0p-AR 
S0p-S9R 
T0p-T9R 
U0p-U9R 
V0p-V9R 



13000- 
13100- 
13200- 
13300- 
13400- 
13500- 



•13099 x0g-x9| 
•13199 /0g-/9l 
•13299 S0g-S9l 
■13399 T0g-T9l 
■13499 U0g-U9l 
•13599 V0g-V9l 
•13699 W0g-W9l 
•13799 X0g-X9l 
■13899 Y0g-Y9l 
13999 Z0g-Z9l 



2000-2099 
2100-2199 
2200-2299 
2300-2399 
2400-2499 
2500-2599 
2600-2699 
2700-2799 
2800-2899 
2900-2999 



P 00-p99 

J00-J99 
K00-K99 

L00-L99 
M00-M99 
N00-N99 
000-099 

P00-P99 
Q00-Q99 

R00-R99 



6000-6099 P 0x- 
6100-6199 J0x- 
6200-6299 K0x- 
6300-6399 L0x- 
6400-6499 M0x- 
6500-6599 N0x- 
6600-6699 O0x- 
6700-6799 P0x- 
6800-6899 QOx- 
6900-6999 POx- 



- P 9Z 10000-10099 P 0p- 
-J9Z 10100-10199 JOp- 
K9Z 10200-10299 KOp- 
L9Z 10300-10399 LOp- 
10400-10499 MOp- 
10500-10599 NOp- 
10600-10699 OOp- 
10700-10799 POp- 
■Q9Z] 10800-1 0899 QOp- 
10900-10999 ROp- 



14000- 
14100- 
14200- 
14300- 
M9F14400- 
N9R 14500- 



14600- 
14700- 



•R9R 



14900- 



•14099 P 0g-p9l 
•14199 J0g-J9l 
14299 K0g-K9l 
14399 L0g-L9l 
•14499 M0g-M9l 
•14599 N0g-N9l 
14699 O0g-O9l 
■14799 P0g-P9l 
•14899 Q0g-Q9l 
14999 R0g-R9l 



3000-3099 
3100-3199 
3200-3299 
3300-3399 
3400-3499 
3500-3599 
3600-3699 
3700-3799 
3800-3899 
3900-3999 



g00-g99 
A00-A99 
B00-B99 
C00-C99 
D00-D99 
E00-E99 
F00-F99 
G00-G99 
H00-H99 
100-199 



-7099 g 0x-g9Z 
-7199 A0x-A9Z 
■7299 B0x-B9Z 
-7399 C0x-C9Z 
-7499 D0x-D9Z 
■7599 E0x-E9Z 
■7699 F0x-F9Z 
-7799 G0x-G9Z 
-7899 H0x-H9Z 
■7999 IOx-l9Z 



11000- 
11100- 
11200- 
11300- 
11400- 
11500- 
11600- 
11700- 
11800- 
11900- 



•11099 g0p-g9R 
■11199 A0p-A9R 
■11299 B0p-B9R 
•11399 C0p-C9R 
•11499 D0p-D9R 
•11599 E0p-E9R 
11699 F0p-F9R |15600-1 
•11799 G0p-G9R 15700- 
11899 H0p-H9R 15800- 
■11999 I0p-|9R (15900- 



15000- 
15100- 
15200- 
15300- 
15400- 
15500- 



15099 g 0g-g9l 
15199 A0g-A9l 
15299 B0g-B9| 
15399 C0g-C9l 
15499 D0g-D9l 
15599 E0g-E9l 
15699 F0g-F9l 
•15799 G0g-G9l 
•15899 H0g-H9l 
15999 IOg-191 



Note : The symbols * , I and ? have been replaced by the letters x, p and g, respectively 
since this is the method of display on the 1052 Printer-Keyboard. 



1401/1440/1460 PROBLEM DETERMINATION AIDS 



D ynamic Service Aids, format of emulator commands : 



IDENTIFI- 
CATION 


KEYWORD AND 
OPERANDS 


FUNCTION 


DISPLAY 


CONFIG 
ADDR=nnnnn 

XADDR=nnnnnn 

SENSE 

INQUIRY 

REG 

STATUS 

TAPE [=n] 

DISK [=n] 

UR 


Assignment of all I/O devices . 

40 Characters of 1400 core storage from 1400 decimal 
address nnnnn . WM are displayed as one underscore 
Word separator as 2 ( — ) . 

4 Fullwords of S/370 main storage data from hex 
address nnnnnn . 

Emulated sense switches from A to G . 

Inquiry indicator . 

IAR, AAR, BAR . 

Switches and IAR, BAR, AAR. 

Assignment of tape unit n . Default value is display all . 

Assignment of disk storage n. Default is display all. 

Assignment of all UR devices 


DEBUG 


ACTION=fSET "I 
<RESED 

TYPE= fADSTOP"] 
1 STEP 

[trace J 


Emulates certain debugging functions. Only one is 
active at a given time. Next command cancels the 
effect of the previous one. DEBUG=YES must be 
coded in the EMSUP macro. 

SET= enables TYPE=SET or TYPE=TRACE 
RESET= disable TYPE action 
nnnnn= 1400 stop address 

ADSTOP= 1400 stop address emulation 
STEP= l/E Mode switch emulation 
TRACE= lists on SYSLST all 1400 instructions 
executed and AAR, IAR, BAR. 


DUMP 


FROM=a,TO=b 
XFROM=a,XTO=b 


Dumps onto SYSLST the 1400 core storage or the 
S/370 main storage. Default value is all 1400 core 
storage dumped. DEBUG=YES must be coded in the 
EMSUP macro. 

1400 Core storage, a and b are decimal from 1 to 5 
digits long. Default value is all core dumped. 

S/370 Main storage, a and b are hex from 1 to 6 
digits long. Default value is all storage dumped. 


RETRY 




Used to reread a card that has just been corrected. 
May be used only if 1400 card are read on a 2540 or 
a 3505. 



1401/1440/1460 PROBLEM DETERMINATION AIDS (....Cont'd) 

Emulator Routine in Error 

If an emulator message has been issued, the message explanation should give some 
idea as to the nature of the error. The Logic Manual lists all the routines that can 
issue a particular message. 

• Determine which 1400 instruction was being emulated at error time. 

• IAR normally points to the next 1400 instruction to be emulated. 

• Use IAR, program listing or dump to locate the 1400 instruction to be emulated. 

• The last 1400 I/O instruction emulated (M, L or U op-code) is stored at CCINSTSV. 

Communication Region 

GPR 3 should point to it which is on a 256 byte boundary (first 512 bytes are put on 
the same page) . 

• If GPR 3 does not point to the COMREG, locate IIQCR01 in the linkedit map. 
The COMREG is located at the next 256 byte boundary address. 

Emulated 1400 Core Storage 

• Beginning address : CRMAPORG 

• Ending address : CRMAPEND 

e 1400 core storage is bounded at each end by a double word containing X'FF 1 . 

Control Blocks and buffers 

• Buffers and DTF's can be located using pointers in the SUB or DUB of the 
emulated device. 

• To find a SUB or DUB, find a displacement in the device assignment table at 
CCASNDEV in the COMREG (displacement 8D0) and the address of the UCB 
address list at CMUCBLST (displacement 888). Using the value from CCASNDEV 
multiplied by 4, as an index, get the address of the corresponding SUB or DUB, 

or : When control has been given to I/O emulation and DOS interface routines, 
get the address of the SUB or DUB involved from GPR 9 , 

or : As the file name is in BCD in the SUB and DUB, find it in the dump between 
the COMREG and emulated 1400 core storage. 

1400 Registers 

The IAR, BAR, AAR are maintained in S/370 binary format, use emulator commands 
DISPLAY=REG or DISPLAY=STATUS to display the contents of those registers. 



Note : COMREG stands for Communication Region. 



1401/1440/1460 TABLE OF REGISTER USAGE 



ROUTINE 


REGISTER CONTENTS AT ENTRY EMULATOR ROUTINES 


IIQEP 


Same as IIQAP 


IIQID 


3 - Address of communication region 




4 - BAR 




5 - AAR 




6 - IAR 




7 - Base register for this routine 




13 - Save area address provided by this routine 


IIQIU 


Same as I1QDS 


IIQMC 


Same as IIQAP 


IIQMD 


Same as IIQAP 


IIQMW 


- Address of variable text or zero 




1 - Message number of message to be issued 




13 - Address of caller's register save area 




14 - Return address 




15 - Entry point address 


I1QNT 


Same as I1QDS 


IIQOA 


- Address of variable text or zero, or length of operator's 




reply on return from IIQMW 




1 - Message number of message to be issued or address of 




operator's reply on return from IIQMW 


IIQOB 


- Length of the emulator command or control statement 




1 - Address of the emulator command or control statement 


IIQOC 


- Address of a parameter list 


thru 




I1QOK 




IIQTP 


3 - Address of communication region 




9 - Address of SUB 




13 - Address of caller's register save area 




14 - Return address 




15 - Entry point address and DILCNT interruption indication 


1IQSD 


3 - Address of communication region 




13 - Address of caller's register save area 




14 - Return address 




15 - Entry point address 


IIQST 


3 - Address of communication region 




7 - Base register for this routine 


IIQUR 


3 - Address of communication region 




4 - BAR 




13 - Address of caller's register save area 




14 - Return address 




15 - Entry point address and DILCNT interruption indication 


IIQUR1 


3 - Address of communication region 




4 - BAR 




9 - Address of printer SUB 




13 - Address of caller's register save area 




14 - Return address 




15 - Entry point address 



1401/1440/1460 TABLE OF REGISTER USAGE (....Cont'd) 



ROUTINE 


REGISTER CONTENTS AT ENTRY EMULATOR ROUTINES 


IIQVT 


Same as 


IIQDS 


IIQAP 


3 - 


Address of communication region 




4 - 


BAR 




5 - 


AAR 




7 - 


Base register for this routine 


IIQCN 


3 - 


Address of communication region 




4 - 


BAR 




9 - 


Address of SUB 




14 - 


Return address 




15 - 


Entry point address 


IIQCP 


3 - 


Address of communication region 




4 - 


BAR 




5 - 


AAR 




7 - 


Base register for this routine 


IIQDI 


3 - 


Address of communication region 




4 - 


BAR 




5 - 


AAR 




9 - 


Address of DUB 




14 - 


Return address 




15 - 


Entry point address 


IIQDK 


Same as 


IIQDI 


IIQDS 


- 


Code indentifying function to be performed 




1 and 9 


- Address of SUB 




3 - 


Address of communication region 


IIQEI 


- 


Code indentifying function to be performed 




1 - 


Address of SUB or DUB 



Note that the DILCNT, set by unit record and tcpe emulation routines 
for overlapped l/O operations, is in the seven leftmost bits of GPR 6. 

The compatibility feature DIL instruction sets GPR 4, GPR 5, GPR 6, 
and GPR 7 (BAR, AAR, IAR, and base register) before giving control 
to an emulator program routine. The compatibility feature also uses 
GPR 2 as a work register. 

Register usage remains the same throughout the execution of a given 
routine. In addition, note that GPR 15 is used for return codes by 
IIQEI, IIQDS, IIQIU, IIQMW, IIQNT, IIQVT, and IIQOC through 
IIQOI. 



1410/7010 PROGRAM ORGANIZATION 



Emulator program overlay tree: 

IIRINENT 

IIRURS 

IIRCRC2 

IIRCRC1 

IIR14DEB 

IIRINECB 

IIROJED 

IIRMWTR 

IIRSDR01 

IIROACON 

IIROBCON 

IIRINHF 



IIRINEIO 
IIRCCPRO 
MRCCMOD 



The CSECTs on the left of the 
figure, below the horizontal 
line, are overlayed when the 
execution phase is loaded into 
System/370 main storage. 



Emulator Program CSECT Layout 



IIRSTR 

IIRCP 

IIRFP 

I1RST 

1 1 RPR 

IIRISDCS 

IIREIOCS 

IIREJR 

IIRBFEIO 

IIRTPMLU 

IIRMTMOD 

IIRNTDOS 

IIRVTDOS 

IIRDSMOD 

IIRDSDOS 

IIRDCC 

IIRDKO 

IIRIUDOS 

IIRMIM 

IIRMIC 

IIRIS 

IIRURMOD 

IIRDK1 

IIRINBUF 



INITIALIZATION 


CPU EMULATION 


I/O EMULATION 


EMULATOR SERVICES 


IIRINENT 


IIRCP 


IIRURS 


IIROJED 


IIRINECB 


IIRFP 


IIRIDCS 


IIRMWTR 


IIRINHF 


IIRST 


IIREIOCS 


IIRSDR 


IIRINEIO 


IIRPA 


IIRBFEIO 


IIROACON 


IIRINBUF 


IIRMIM 


IIRTPMLU 


IIROBCON 




IIRMIC 


IIRMTMOD 


IIRCCPRO 






IIRNTDOS 


IIRCCMOD 






IIRVTDOS 


IIRSTR 






IIRDSMOD 


IIR14DEB 






IIRDSDOS 


IIREJR 






IIRDCC 








IIRDKO 








IIRIUDOS 








IIRIS 








IIRURMOD 








IIRDK1 





1410/7010 DISK FORMAT 



4 bytes 4 bytes I 4 bytes | 4 bytes 4 bytes 



8 bytes 



_b z tes. 



PP | bb 
I 



XTRK 

NMBR ' 



SGM1 
LGTh 



track rec 
'number 'nm 



2 by- 



4 bytes 



8 bytes 



"1 — r 

TRACK i REC 

' NUMBER NM 
J I L!L 



Each System/370 disk record represents one 1400 disk track. 



PP 


: Length of the S/370 physical record 

1301 Mod land 2 : 2,828 bytes 

1302 Or 2302 Mod 1 and 2 : 5,878 bytes 


bb 


: Set to zero 


XTRK 

NMBR 


Hex number of the 1400 track (first trk is 0) 
: First byte : bit = move mode 
= 1 load mode 


SGMT 
LGTH 


Sum of the length of the control information field 
: (14 bytes) and the 1400 data field 


LM 


: Bit = move mode 
= 1 load mode 


TRACK 
NM3R 


: Decimal number of the 1400 track 


REC 
NMBR 


: Decimal number of the record (first record is 0) 


** 


: Not used 



DISK FORMAT 


LOAD MODE 
CHARACTERS 


MOVE MODE 
CHARACTERS 


1301 

Models 1 and 2 

1302 or 2302 
Models 1 and 2 


2165 
4533 


2800 
5850 



Number of 1400 characters in System/370 Disk Records 



1410/7010 TABLE OF REGISTER USAGE 



MODULE 


REGISTER CONTENTS AT ENTRY 


IIRCP 


3 - Address of the communication region 

4 - BAR 

5 - AAR 

7 - Base register 


IIRDK 


3 - Address of the communication region 

4 - BAR 

5 - AAR 

9 - Address of the DUB 
10 - Address of the ECCB 

14 - Return address 

15 - Entry point address 


IIRDL 


Same as IIRDK 


IIRDS 


- Code indentifying the function to be performed 

1 and 9 - Address of the DUB or the SUB 

3 - Address of the communication region 


IIREI 


- Code indentifying the function to be performed 

1 - Address of a DUB or SUB 


IIRID 


3 - Address of the communication region 

4 - BAR 

5 - AAR 

6 - IAR 

7 - Base register 

13 - Save area address 


IIRIU 


Same as IIRDS 


IIRMI 


Same as IIRCP 


IIRFDP 


Same as IIRCP 


II RPR 


Same as IIRCP 


IIRST 


Same as IIRCP 


IIRMW 


- Address of variable text or zero 

1 - Message number of message to be issued 

13 - Address of caller's register save area 

14 - Return address 

15 - Entry point address 


IIRNT 


Same as IIRDS 


IIROA 


- Address of variable text or zero, or length of 68160r 

operator's reply on return from IIRMIO 

1 - Message number of message to be issued or address of 

an operator's reply on return from IIRMIO 


IIROB 


- Length of the emulator command or control statement 

1 - Address of the emulator command or control statement 


II ROC 

Ihru 

IIROK 


- Address of a parameter list 



1410/7010 TABLE OF REGISTER USAGE (. . . .Cont'd) 



MODULE 


REGISTER CONTENTS AT ENTRY 


IIRTP 


3 - Address of the communication region 
9 - Address of the SUB 
10 - Address of the ECCB 

13 - Address of caller's register save area 

14 - , Return address 

15 - Entry point address and DILCNT interruption indication 


IIRSD 


3 - Address of the communication region 

13 - Address of caller's register save area 

14 - Return address 

15 - Entry point address 


IIRST 


3 - Address of the communication region 
7 - Base register 


IIRVT 


"Same as IIRDS 



Note that GPR 15 is used for return codes by IIREI, IIRDS, IIRIU, 
IIRMW, IIRNT, IIRVT, and IIROC through IIROI and IIROK. 

The compatibility feature DIL instruction sets up GPR 4, GPR 5, 
GPR 6, and GPR 7 (the BAR, AAR, IAR, and entry point address 
for the routine given control), before giving control to an emulator 
program routine. The compatibility feature also uses GPR 2 as a 
work register. 



1410/7010 PROBLEM DETERMINATION AIDS 
D ynamic Service Aids, formal- of emulator commands ; 



IDENTI- 
FICATION 


KEYWORD AND 
OPERANDS 


COMMENTS 


DISPLAY 


SWITCH 
REG 
STATUS 
TAPE l=cn] 

DISK[=cma] 

UR 

CONFIG 

ADDR=nnnnn 

XADDR=nnnnnn 


Displays on SYSLOG 

Status of the inquiry indicator 

IAR, AAR, BAR 

Switches and IAR, AAR, BAR 

Assignment of tape unit en (c=channel, n=unit) 
Default value is display all 

Assignment of disk storage cma (c=channel,m=module, 

a=unit) 

Default value is display all 

Assignment of all unit record devices 

Assignment of all I/O devices 

40 Characters of 1400 core storage from 1400 decimal 
address 'nnnnn'. WM are displayed as one underscore 
Word separator as 2 ( — ) 

4 Fullwords of S/370 main storage data from 
hex address 'nnnnnn' 


DEBUG 


ACTION= fnnnnr} 
SET i 

[reset] 

TYPE= fADSTOP) 
STEP \ 

[trace J 


Emulates certain debugging functions. Only one is 

active at a given time. Next command cancels the 

effect of the previous one. 

DEBUG=YES must be coded in the EMSUP macro. 

'nnnnn' = 1400 stop address 

SET = enable TYPE=SET or TYPE=TRACE 

RESET = disable TYPE action 

ADSTOP = 1400 stop address emulation 

STEP = l/E Mode switch emulation 

TRACE = lists on SYSLST all 1400 instructions executed 

and AAR, IAR, BAR 


DUMP 


FROM=a,TO=b 
XFROM=a,XTO=b 


Dumps onto SYSLST the 1400 core storage or the S/370 
main storage. Default value is all 1400 core storage 
dumped. DEBUG=YES must be coded in the EMSUP macro 

1400 core storage (a and b are decimal from 1 to 5 
digits long. Default value is all core dumped. 

S/370 main storage (a and b are hex from 1 to 6 
digits long. Default is all storage dumped. 



CHAPTER VI 
BTAM 



CONTROL BLOCK LINKAGES 



I/O/a 



. BTAM Module 



I/O Executor 
(EXCP) 



I/O Interrupt 
Handler 



I/O Error 
Routine 



Partition COMREG 



CSW 
Status Byte 



Logical 
Unit order 



P 








1 


2 | 3 


0( 0) 


LCB Count 


LCB Size 


Feature Flags 


4(4) 


Flag Byte 1 
or 1AM 


WRU 


EOM 


EOT 


8( 8) 


DTFBT Flags 


Buffer Control Block Address 


12(0C) 


Device Code 


Address of CCW Model Table 


16(10) 


DTFBT Length 
16 


Address of BTAM Logic 


20(14) 


DTF Type + 
Code 


Flag Byte 2 


Message Length or Mondly 


24(18) 


Retry Count 


Address of Table of specific characters 


28(1 C) 


2x Retry Count 


Line Error Block Address 


32(20) 


Address of Table c 


f Offsets 


36(24) 


Reserved 


40(28) 


^CCB-LCB Area (S 


ee Line Control Blocks) 




Buffer Pool (if any) 



DTFBT Table Explanation 



Byte(s) 


Description 


Meaning 


Source 


0(0) 
LCB Count 


The number of LCB's in this DTFBT 


Generated by the DTFBT 
macro by analyzing the 
LINELST keyword operand 


I(D 
LCB Size 


The number of bytes in each LCB in 
this DTFBT 


Computed by DTFBT macro 
expansion from the DE- 
VICE and FEATURE ope- 
rands 


2=1 (2-3) 
Feature Flags 


Describes device features : 

First byte (2) 

Bit Configuration Meaning 

B' 10000000' SIX 
B '01 000000' SXW 
B' 11000000' SIW 
B'00100000' RIX 
B '000 10000' RXW 
B '001 10000' RIW 
B '0000 1000' SLV 
B'00000100' BSC 
B '000000 10' Reserved 

B'ooooooor oiu 


DTFBT macro operand 
FEATURE 



DTFBT TABLE (....Cont'd) 



DTFBT Table Exp 


anation 




Byte(s) 


Description 


Meaning 


Source 


2-3 (2-3) 


Second byte (3) 




Feature Flags 
(Cont'd) 


Bit Configuration Meaning 

B ' 1 0000000 ' Stat ion Contro 1 

(STC) 
B'01000000" Transmit Control 

(TRC) 
B'00100000' Checking (CHK) 
B'000 10000' PCI 
B'00001000' Start -stop Auto 

Poll 

Bits 5-7 of the second byte are 
reserved 




4 (4) 


Describes WTTA device feature 


DTFBT macro operand 


1AM or 




FEATURE 


Flag Byte 1 


Local 2260/local 3270 Flags: 


2260 local READ routine 




Bit Configuration Meaning 


and Interruption handler/ 




B'10000000' On-line Termi- 


BSC Message Analysis 
Routine 




nal Test Flag 




B '000 10000' Local 2260 and 






local 3270 






RESTPL Inhibit 






Flag 






B'00001000' Local 2260 and 






local 3270 NOP 






Wait Flag 






B'00001000' BSC Valid First 






Character Flag 






(used by IJLM- 






ARTN) 






B'00000100' Local 2260 and 






local 3270 Read 






Wait Flag 






B '000000 10' Local 2260 and 






local 3270 Res- 






can Flag 






B'OOOOOOOl' Load 2260 and 






local 3270 En- 






able-Read-in- 






AppendageFlag 






The remaining bits are reserved. 






When bit zero is on , the next three 






bytes contain On-line Terminal Test 






Information. For the local 2260 and 






local 3270, the next three bytes 






contain a pointer to the DECB 




I (5) 


Describes WTTA device feature 


DTFBT macro operand 


WRU 




FEATURE 


6 (6) 


Character representing the end of a 


DTFBT macro operand 


EOM 


message (WTTA) 


EOM 



DTFBT TABLE (....Cont'd) 



DTFBT Table Explanatio 



Byte(s) 


Description 


Meaning 


Source 


1(7) 
EOT 


Character representing the end of a 
transmission (WTTA) 


DTFBT macro operand 
EOT 


8 (8) 
DTFBT Flags 


Bit Configuration Meaning 

B'OOOOOOOl' DTFBT Open 
Flag 

B'OOOOOOIO' Non-partitioned 
channel program 
flag 

B'00000100' Switched net- 
work flag 

B'00001000* Multipoint con- 
figuration (BSC) 

The remaining bits are reserved 


The switched-network 
flag, the multipoint flag 
and the non-partitioned 
channel program flag are 
put in at assembly time. 
The open flag is maintained 
by the OPEN and CLOSE 
routines. 


9-11 (09-OB) 
Buffer Control 
Block Address 




Put in at assembly time 
by the DTFBT macro 


]2 (OC) 
Device Code 


Numeric identifier of the type of 

device attached to the lines of this 

group 

Devices Equated to 

1030 1 
1060 2 
2848 3 
83B3 4 
115A 5 
2260 6 
1050 7 
2740 8 
TWX33 9 
TWX35 10 
1130 12 
2780 13 
WTTA 14 
2020 15 
3277 17 


Put in by the DTFBT macro 
using the DEVICE keyword 
operand 


13-15(0D-0F) 
CCW Model 
Table Address 




Put in by the Linkage 
Editor 


16(10) 
DTFBT Length 
16 




Put in at assembly time 


17-19 (11-13) 
Address of 
BTAM Logic 




Put in by the Linkage 
Editor 


20 (14) 
DTF-tCU 


Numeric identifier of the DTF type 
and the control unit type 


Initialized at assembly 
time from the CU keyword 
operand 



DTFBT TABLE (....Cont'd) 
DTFBT Table Explanation 



Byte(s) 


Description 


Meaning 


Source 


20 (14) 
DTF-tCU 
(Cont'd) 


The DTF code is X'40' for a DTFBT. 
The following CU codes are OR'ed 
into the low-order 4 bits: 
Control Unit Equated to 

7770 1 
2848 3 

2701 4 

2702 5 

2703 6 
3272 7 




21(15) 
Flag Byte 2 


Flags for ERP: 

Bit Configuration Meaning 


Flags are set by the 
ERROPT operand 


B'00000100' ERP requested 
B'00000010' Read text retry 
B'OOOOOOOT Write text retry 




The remaining bits are reserved 




22-23 (16-17) 
Message Length 




DTFBT macro operand 
MSGL 


MONDLY 


Number of pad characters (WTTA) 


DTFBT macro operand 
MONDLY 


24 (18) 
Retry Count 


BSC Retry Ceiling 


DTFBT macro operand 
RETRY 


25-27 (19-1B) 
Address of 
Table of special 
Characters 




Put in by Linkage Editor 


28 (1C) 

2x Retry Count 


2x BSC Retry Ceiling 


DTFBT macro operand 
RETRY 


29-31 (1D-1F) 
Line Error 
Block Address 




DTFBT macro operand 
LERBADR 


32-35 (20-23) 
Table of 
Offsets 


Pointers to the table of model 
CCW's corresponding to operation 
types defined for a particular device 
The displacement in the Table of 
Offsets corresponds to the operation 
code for the macro. An X'FF' at 
displacement 07 in the table, for 
example, means that optype X'07' 
(READ Repeat-TP) is not available. 

Operation Type Codes 

Code Macro 

X'00' WRITE DISCONNECT 
X'OT READ INITIAL 
X'02' WRITE INITIAL 


Generated by the DTFBT 
macro from the DEVICE 
operand 



DTFBT TABLE (....Cont'd) 
DTFBT Table Explanation 



Byte( 



Meaning 



32-35(20-23) 
Table of 
Offsets 
(Cont'd) 



X'03' 


READ CONTINUE 


X'04' 


WRITE CONTINUE 


X'05' 


READ CONVERSATIO- 




NAL 


X'05' 


READ CONTINUE WITH 




GRAPHICS 


X'06' 


WRITE CONVERSATIO- 




NAL 


X'07' 


READ REPEAT 


X'08' 


WRITE ACK 


X'08' 


WRITE INIT TRANSPA- 




RENT BLOCK 


X'09 1 


READ INITIAL INQUIRY 


X'09' 


READ SKIP 


X'OA' 


WRITE NAK 


X'OA" 


WRITE INITIAL TRANS- 




PARENT TEXT 


X'OB' 


READ BUFFER 


X'OB' 


READ REPEAT WITH 




GRAPHICS 


X'OC 


WRITE AT LINE ADDR. 


X'OC' 


WRITE INIT TRANSPA- 




RENT CONVERSATIO- 




NAL 


X'OD' 


READ SHORT 


X'OD' 


READ INQUIRY 


X'OE' 


WRITE ERASE 


X'OE' 


WRITE INITIAL CON- 




VERSATIONAL 


X'OF' 


READ CONTINUE WITH 




IDENTIFICATION EX- 




CHANGE (WT TELE- 




GRAPH) 


X'10' 


WRITE INVITATIONAL 


X'10' 


WRITE TRANSPARENT 




BLOCK 


X'll' 


READ INTERRUPT 


x'ir 


READ MODIFIED 


X'I2' 


WRITE TRANSPARENT 




TEXT 


X'12' 


WRITE INITIAL OPTI- 




CAL 


X'12' 


WRITE UNPROTECTED 




ERASE 


X'13 1 


READ CONTINUE WITH 




LEADING ACKNOW- 




LEDGEMENT 


X'13' 


READ CONNECT 


X'I3' 


READ BUFFER FROM 




POSITION 



DTFBT TABLE (....Cont'd) 
DTFBT Table Explanation 



Byte(s) 


Description 


Meaning 


Source 


32-35 (20-23) 
Table of 
Offsets 
(Cont'd) 


Code Macro 

X'U' WRITE TRANSPARENT 
CONVERSATIONAL 

X'14' WRITE INVITATIONAL 
OPTICAL 

X'15' READ CONNECT WITH 
TONE 

X'16' WRITE EOT 

X'16' WRITE CONVERSATIO- 
NAL OPTICAL 

X'18' WRITE WACK 

X'19' READ MODIFIED FROM 
POSITION 

X'lA' WRITE INQUIRY 

X'lB' CONTROL INITIAL 

X'lC CONTROL DISABLE 

X'lD' CONTROL MODE 

X'lE' CALL SEGMENT 

X'lF' ANSWER 

X'20' WRITE CONNECT 




36-39 (24-27) 
Reserved 






40-XX(28-..) 
Line Control 
Blocks 


Line control blocks describe the 

particular line 

(See Line Control Block for detailed 

description) 


One LCB is generated 
at assembly time for each 
line in the LINELST ope- 
rand sublist 


XX-XX (..-.. 
Buffer Pool 


(Optional) 





LINE CONTROL BLOCK 



0( 0) 



16(10) 
20(14) 



24(18) 
32(20) 
40(28) 

104(68) 

108(6C) 
112(70) 



o I. ' 1 


^ 


CCB 


Flag Byte 


DECB Address 


Relative Line No 


Send J Rcve 
Ack ] Ack 
"Local 3270 
Flag Byte 


Reserved 


Mode Byte(BSC) 


ERP Message Code and Status Sawe Area 


CCW Area reserved for ERP and Audio 


User Channel Program Area 


Marker (BSC) 


Total User CCW 
Retries (BSC) 


User CCW 
Retries (BSC) 


ERP CCW Retries 
(BSC) 


BSC Flag Byte 1 


BSC Flag Byte 2 


BSCFIagByte3 


Reserved 


BSC ERP CCW Area (3 double-words) 



Line Control Block Explanation 



Byte(s) 


Description 


Meaning 


Source 


0-15 (00-0F) 
CCB 


Command Control Block 


Space is reserved by the 
DTFBT instruction. The 
contents of the block are 
maintained by the Super- 
visor, IJLCPGXand 
IJLBTIH. 


16(10) 

LCB Flag Byte 


Used to indicate LCB Conditions 
Bit Configuration Meaning 

B' 10000000' Last LCB in line 
group 

B'0 1000000' Line error at 
Open (except 
for local 2260 
and local 3270 

B'01000000' Local 2260 or 
local 3270 Read 
started from 
Appendage 


These flags are initialized 
by the DTFBT macro in- 
struction. IJLCPGX, 
IJLBTIH and OPEN main- 
tain them. 



LINE CONTROL BLOCK (....Cont'd) 
Line Control Block Explanation 



Byte(s) 


Description 


Meaning 


Source 


]6 (10) 
LCBFlag Byte 
(Cont'd) 


Bit Configuration Meaning 

B'00100000' Halt I/O reques- 
ted 

B'OOOIOOOO' LCB Cancel flag 
(ERP) 

B '0000 1000' Write at Line 

Address (remote 
2260), LCB Q- 
flag (local 2260 
or local 3270) 

B'00000100' Attention flag 
(local 2260 or 
local 3270), 
Terminal Test 
flag (OIU) 

B'00000010' Skip flag (local 
2260 or local 
3270), Frame 
Change Test flag 
(OIU) 

B'00000001' Printer flag (lo- 
cal 2260 or lo- 
cal 3270), Mes- 
sage from OIU 
flag (OIU) 

B'00000001' Re-read flag 
(WTTA) 

B'00000001' Auto Poll chan- 
nel program mo- 
dified flag (BSC) 




17-19(11-13) 
DECB Address 




This field is set to zero 
by the completion logic; 
The address is supplied 
by IJLCPGX 


20 (14) 
RLN 


Relative Line Number 


The relative line number 
is inserted by the DTFBT 
macro instruction 


21(15) 
Send ACK/ 
RcveACK or 






Local 3270 
Flag Byte 


Bit Configuration Meaning 

B'10000000' Printer busy flag 

B'01000000' Unreliable devi- 
ce buffer content 

B'00100000' RFT in progress 
flag 

B'00010000' Start original 
READ flag (RFT 
flag) 

B '0000 1000' I/O request Nag 





LINE CONTROL BLOCK (. . . .Cont'd) 
Line Control Block Explanation 



Byte(s) 


Description 


Meaning 


Source 


22(16) 
Reserved 






23(17) 
Mode Byte 


Used for Set Mode 


Initialized at assembly 
time; Updated via CON- 
TROL 


24-31 (18-1F) 
ERP Code and 


Error Message Code (byte 24) 


The hex value (1-byte) 
of the error message num- 
ber to be printed is inser- 
ted by the routine that 
determined the error con- 
dition 


Status Save 
Area 


CSW bytes 1-7 (but not byte 0) 
(bytes 25-31) 


The CSW is saved for the 
last user (non-ERP) CCW 
that completed 


32-39 (20-27) 
ERPCCW 




CCW is set up and execu- 
ted in an attempt to re- 
cover from the error con- 
dition 


40-103(28-67) 
CCW Space 


Channel Program Area 


IJLCPGX builds the 
channel program in this 
space 


104-107 (68-6E 
Marker and 
Retry Bytes 


) 




108 (6C) 

BSC 

Flag Byte 1 


Bit 0: 1= ENQ can be legally re- 
ceived 
0= ENQ an illegal response 
to text 

Bit 1: 1= Last response-to-text was 
NAK (i.e., NAK was sent 
to remote station as the 
response to the last recei- 
ved message) 

Bit 2: 1= No response was received 
to previous Write text 

Bit 3: 1= No retry flag 

Bit 4: 1= Error occurred on an ERP 
CCW 

Bit 5: 1= ERP in process (due to 
Unit Check) 

Bit 6: 1= Error occurred on a Read 
Response to text or a Read 
text in a conversational 
WRITE channel program 

Bit 7: 1 = First retry of the error dis- 
cussed for bit 6 





LINE CONTROL BLOCK (. . . .Cont'd) 
Line Control Block Explanation 



Byte(s) 


Description 


Meaning 


Source 


109 (6D) 

BSC 

Flag Byte 2 


For any READ/WRITE macro other 
than WRITE Inquiry (TQ) with entry 
coded 'S', the Operation flag byte 1 
in the DECB is moved into the BSC 
flag byte 2 in the LCB 

For WRITE Inquiry (TQ) with entry 
not coded 'S' bit-2 (B'OOIOOOOOT 
of the BSC flag byte 2 in the LCB is 
turned ON subsequent to the moving 
in of the DECB Operation flag byte 1 

Note: 

For WRITE Inquiry (TQ) with entry 
coded 'S', the BSC flag byteTTn" 
the LCB Extension will contain the 
value set by IJLCPGX for the most 
recently issued macro (normally an 
initial-type WRITE for dial opera- 
tion) that was not a WRITE TQ with 
entry coded 'S' 


Initialized by IJLCPGX 


110 (6E) 

BSC 

Flag Byte 3 


Bit 0: BTAM initiates terminal test 
Bit 1: LCB in test flag 
Bit 2: X= flag for on-line test 
Bit 3: Invalid character in RFT 
Bit 4: RESETPL flag for TERM test 
Bit 5: Positive response to line bid 

has been received 
Bit 6: Remote 3270 RFT BSC flag 
Bit 7: Reserved 




ill(6F) 
Reserved 






112-135(70-87 
BSC ERP CCW 


) BSC ERP CCW Area (3 double-words) 





DATA EVENT CONTROL BLOCK (DECB) 








. 1 * 


3 




0(0) 


Completion Code 


Reserved for DOS/BTAM internal use 

(See explanantion of bit 6 of the flag byte) 


4(4) 


Optype Qualifier 
bits 


Optype Code 


Length 


8(8) 


Response Informa- 
tion Byte 


DTFBT Address 


12(0C) 


Mode Byte 


Input/Output Address 


16(10) 


Sense Byte 


Sense byte for 
Diagnostic Read/ 
Write 


Residual Count 


20(14) 


Command Code 


List Address or Entry Address 


24(18) 


F lag byte 


Relative Line 
Number 


Response to 
Addressing Field 


Response to 
and/or VRC 


LRC 


28(1 C) 


TPCode 


Error Information 


Status Bytes 


32(20) 


Reserved 


Addressing Pointer 


36(24) 


Reserved 


Polling or Scanning Pointer 


40(28) 


Flag Bytes for 
extended DECB 


Reserved 


Auxlength 


44(2C) 


Reserved 


Auxarea Address 



Note: The first four (4) bytes of the DECB are called the Event Control Block 

(ECB). The last eight (8) bytes of the DECB are called the DECB extension. 



DECB Explanation 




Byte(s) 


Description 


Meaning 


Source 


0(0) 

Completion 

Code 


X'00' Operation in progress 
X'7F' Normal completion 
X'41' I/O error 

X'44' Terminal ID non-comparison 
X'48' HALT I/O requested and 

completed 
X'50' Contention (BSC or WTTA) 
X'51' End-of-file condition 
X'52' Wrong length record 
X'54' Non-productive operation 
X'58' Cancel condition detected 
X'60' Wrong ACK-i received 

(i=0 or 1) 
X'61' WACK received or RVI re- 
ceived in response to selec- 
tion on a multipoint line 
X'62' ENQ received in response 
toENQ 
; X'64' Unreliable device buffer 
contents 


Maintained by IJLCPGX 
and IJLBTIH 



DATA EVENT CONTROL BLOCK (DECB) (....Cont'd) 



Byte(s) 


Description 


Meaning 


Source 


1-3 (1-3) 
Reserved 


Reserved for DOS/BTAM internal use 
(See explanation of bit 6 of the flag 
byte) 




1(4) 

Optype Quali- 
fier bits 


Flags are set according to the type 

of operation 

Bit Configuration Meaning 


Set by READ, WRITE and 
CONTROL 


B'10000000' Initial optype 
B'0 1000000' Reset optype 
B'00100000' 2260 local lock 




operation 
B'00010000' Conversational flag 
B'00010000' Skip buffer check 

flag (local 3270 for 

RFT) 
B'00001000' Start-stop; Auto 

Poll used in current 






operation 
B '00000 100' Entry 'S' 
B '00000010' Area 'S' 
B '0000000 1' Length's' 




5 (5) 

Optype Code 
(See DTFBT 
Table) 


Operation type code of the last exe- 
cuted I/O macro instruction 


Set by READ, WRITE and 
CONTROL 


6-7 (6-7) 
Length 


The amount of data to be transmitted 


Length operand of READ 
or WRITE macro instruct. 


8 (8) 
Response 
Information 
byte 


Bit Configuration Meaning 




B '000000 10' An RVI has been 

received in respon- 
se to selection 


9-11 (09-OB) 
DTFBT Address 


Specifies the line group 


Operand of READ, WRITE 
or CONTROL 


12 (OC) 
Mode byte 


Used for Set Mode 


Set by IJLCPGX 


13-15 (OD-OF) 

Input/Output 

Address 




Area operand of READ, 
WRITE or CONTROL 


J6 (10) 
Sense byte 


Bit Configuration Meaning 

B'10000000' Corrmand reject 
B '01 000000' Intervention req'd 
B'00100000 1 Bus-out check 
B'00010000' Equipment check 
B'00001000' Data check 
B'00000100' Overrun or, for 

local 3270, unit 

specify 


Stored by IJLBTIH when 
an unit check has occurred 



DATA EVENT CONTROL BLOCK (DECB) (. . . .Cont'd) 



Byte(s) 


Description 


Meaning 


Source 


16(10) 
(Continued) 


Bit Configuration Meaning 

B '000000 10' Lost data or, for 
local 3270, con- 
trol check 

B'00000001' Time out or, for 

local 3270, opera- 
tion check 




IZ('i) 

Sense byte for 

diagnostic 

READ/WRITE 






18-19(12-13) 
Residual count 


The remaining amount of data which 
was not transmitted 


Stored by IJLBTIH from 
the CCB and CSW 


20 (14) 

Command 

code 


Contains the command code 


Stored by IJLBTIH when 
completion has occurred 


21-23(15-17) 
Entry Address 


Address of terminal list entry 


Initialized from entry 
operand of READ or 
WRITE; maintained by 
IJLBTIH 


24(18) 
Flag byte 


Flag set to determine the type of 

operation 

Bit Configuration Meaning 

BMOOOOOOO' PCI occurrence 
B'01000000' EOT received 
(BSC or V/TTA) 
B'00100000' DLE EOT recei- 
ved (BSC) orWRU 
(WTTA) 
B'00010000' Stop flag 
B '000 10000' Error status mes- 
sage received 
(BSC) 
B'00001000' Enable flag 
B'00000100' Indicates read 

buffers on a con- 
versational WRITE 
B'00000010' Indicates ECB 

bytes I, 2 and 3 
contain address of 
first unre leased 
buffer not used at 
completion of a 
READ with area 'S 
B '0000000 1' Terminal test 
operation 


Set by IJLCPGX 



DATA EVENT CONTROL BLOCK (DECB) (. . . .Cont'd) 



Byte(s) 


Description 


Meaning 


Source 


25(19) 


Position of line entry in list 


From macro instruction 


Relative line 




operand 


number 






26 (1A) 


Space reserved for response to add- 


Channel program reads 


Response to 


ressing 


into this field 


Addressing 






27 (IB) 






Read response 






to redundancy 






check 






28 (1C) 


TP code of last command 


Maintained by IJLBTIH 


TPCode 




and IJLCPGX 


29(1D) 


ERP information 


Set by IJLBTIH 


Error Informa- 


Bit Configuration Meaning 




tion 


B '01 000000' Should-not-occur 
error 

B'00100000' Error in ERP 

B '00010000' Diagnostic WRITE 
READ failed 

B '00000010' ENQ received in 
text (BSC) 

B '00000001 ' NAK response to 
text (BSC) 
NAK or ID-NAK 
response to ID- 
ENQ (BSC) 




30-3K1E-1F) 


Bytes are set when an event occurs 


Set by IJLBTIH from the 


Status bytes 




CSW 


32 (20) 






Reserved 






33-35 (21-23) 


Address of terminal being addressed 


Set by IJLCPGX 


Addressing 






Pointer 






36 (24) 






Reserved 






37-39 (25-27) 


Address of terminal being polled or 


Set by IJLCPGX 


Polling or 


scanned 




Scanning poin- 






ter 






40 (28) 


Flags are set according to the type 


READ/WRITE 


DECB extension 


of operation using the DECB exten- 




flag byte 


sion 

Bit Configuration Meaning 

B'10000000' Auxarea 'S' 





DATA EVENT CONTROL BLOCK (DECB) (. . . .Cont'd) 



Byte(s) 


Descripfion 


Meaning 


Source 


41 (29) 
Reserved 






42-43 (2A-2B) 
Auxlength 


The amount of data to be transmitted 
or received by operations using the 
DECB extension 


READ/WRITE 


44 (2C) 
Reserved 






45-47(2D-2F) 
Auxarea 


Address of data to be transmitted or 
input area for operations using the 
DECB extension 


READ/WRITE 
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